object F_Conversao: TF_Conversao
  Left = 79
  Top = 110
  BorderIcons = []
  BorderStyle = bsSingle
  Caption = 'Convers'#227'o da Base de Dados Clipper para Oracle'
  ClientHeight = 571
  ClientWidth = 790
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = [fsBold]
  OldCreateOrder = False
  Position = poMainFormCenter
  WindowState = wsMaximized
  PixelsPerInch = 96
  TextHeight = 14
  object Label1: TLabel
    Left = -5
    Top = 8
    Width = 244
    Height = 14
    Caption = 'Entre com o Drive e Local da Instala'#231#227'o Atual'
  end
  object Label2: TLabel
    Left = 29
    Top = 88
    Width = 56
    Height = 14
    Caption = 'Hist'#243'ricos'
  end
  object Label4: TLabel
    Left = 258
    Top = 28
    Width = 218
    Height = 14
    Caption = 'Obs: N'#227'o colocar " \ " no fim do caminho'
    Font.Charset = ANSI_CHARSET
    Font.Color = clMaroon
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object ghistorico: TGauge
    Left = 87
    Top = 88
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label3: TLabel
    Left = 10
    Top = 106
    Width = 75
    Height = 14
    Caption = 'Ramo de Ativ.'
  end
  object gramo: TGauge
    Left = 87
    Top = 106
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label5: TLabel
    Left = 6
    Top = 124
    Width = 79
    Height = 14
    Caption = 'Local de Cobr.'
  end
  object Glocal: TGauge
    Left = 87
    Top = 124
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label6: TLabel
    Left = 18
    Top = 142
    Width = 67
    Height = 14
    Caption = 'Tipo de Doc.'
  end
  object gtipodoc: TGauge
    Left = 87
    Top = 142
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label7: TLabel
    Left = 48
    Top = 160
    Width = 37
    Height = 14
    Caption = 'Moeda'
  end
  object gmoeda: TGauge
    Left = 87
    Top = 160
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label8: TLabel
    Left = 7
    Top = 178
    Width = 78
    Height = 14
    Caption = 'Cot. da Moeda'
  end
  object gvmoeda: TGauge
    Left = 87
    Top = 178
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label9: TLabel
    Left = 31
    Top = 196
    Width = 54
    Height = 14
    Caption = 'Sub-Local'
  end
  object gsublocal: TGauge
    Left = 87
    Top = 196
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label11: TLabel
    Left = 22
    Top = 214
    Width = 63
    Height = 14
    Caption = 'C'#243'd.Fiscais'
  end
  object gcfiscal: TGauge
    Left = 87
    Top = 214
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label12: TLabel
    Left = 52
    Top = 232
    Width = 33
    Height = 14
    Caption = 'N.B.M.'
  end
  object gnbm: TGauge
    Left = 87
    Top = 232
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label13: TLabel
    Left = 6
    Top = 250
    Width = 79
    Height = 14
    Caption = 'Regras de Pag'
  end
  object gregra: TGauge
    Left = 87
    Top = 250
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label14: TLabel
    Left = 15
    Top = 268
    Width = 70
    Height = 14
    Caption = 'Nat. de Oper.'
  end
  object gnat: TGauge
    Left = 87
    Top = 268
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label15: TLabel
    Left = 7
    Top = 286
    Width = 78
    Height = 14
    Caption = 'Regi'#227'o de Vda'
  end
  object gregiao: TGauge
    Left = 87
    Top = 304
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label16: TLabel
    Left = 3
    Top = 304
    Width = 82
    Height = 14
    Caption = 'Representante'
  end
  object grep: TGauge
    Left = 87
    Top = 286
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label17: TLabel
    Left = 10
    Top = 358
    Width = 75
    Height = 14
    Caption = 'Ct. Correntes'
  end
  object gconta: TGauge
    Left = 87
    Top = 340
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label10: TLabel
    Left = 7
    Top = 376
    Width = 78
    Height = 14
    Caption = 'Fornecedores'
  end
  object gfor: TGauge
    Left = 87
    Top = 376
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label18: TLabel
    Left = 4
    Top = 448
    Width = 81
    Height = 14
    Caption = 'Titulos a Pagar'
  end
  object gtitd: TGauge
    Left = 87
    Top = 448
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label19: TLabel
    Left = 13
    Top = 394
    Width = 72
    Height = 14
    Caption = 'Tipo de Ba'#237'xa'
  end
  object gtb: TGauge
    Left = 87
    Top = 394
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label20: TLabel
    Left = 19
    Top = 412
    Width = 66
    Height = 14
    Caption = 'N.F. Compra'
  end
  object gnfcpa: TGauge
    Left = 87
    Top = 412
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gdcpa: TGauge
    Left = 291
    Top = 502
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label21: TLabel
    Left = 220
    Top = 502
    Width = 69
    Height = 14
    Caption = 'N.F. Dev. Cpa'
  end
  object Label22: TLabel
    Left = 20
    Top = 466
    Width = 65
    Height = 14
    Caption = 'Tipo Pedido'
  end
  object gtp: TGauge
    Left = 87
    Top = 466
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label23: TLabel
    Left = 21
    Top = 484
    Width = 64
    Height = 14
    Caption = 'Comiss'#245'es'
  end
  object gmr: TGauge
    Left = 87
    Top = 484
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label24: TLabel
    Left = 28
    Top = 502
    Width = 57
    Height = 14
    Caption = 'N.F. Venda'
  end
  object gnfv: TGauge
    Left = 87
    Top = 502
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label25: TLabel
    Left = 220
    Top = 520
    Width = 69
    Height = 14
    Caption = 'N.F. Dev. Vda'
  end
  object gnvdv: TGauge
    Left = 291
    Top = 520
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label26: TLabel
    Left = 52
    Top = 340
    Width = 32
    Height = 14
    Caption = 'Conta'
  end
  object gUF: TGauge
    Left = 87
    Top = 358
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label27: TLabel
    Left = 52
    Top = 322
    Width = 33
    Height = 14
    Caption = 'Banco'
  end
  object gBanco: TGauge
    Left = 87
    Top = 322
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label28: TLabel
    Left = 48
    Top = 538
    Width = 34
    Height = 14
    Caption = 'Grupo'
  end
  object gGrupo: TGauge
    Left = 87
    Top = 538
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label29: TLabel
    Left = 250
    Top = 196
    Width = 39
    Height = 14
    Caption = 'Cliente'
  end
  object gCli: TGauge
    Left = 290
    Top = 196
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label31: TLabel
    Left = 233
    Top = 88
    Width = 54
    Height = 14
    Caption = 'Linha Vda'
  end
  object gLinha: TGauge
    Left = 290
    Top = 88
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label30: TLabel
    Left = 250
    Top = 106
    Width = 39
    Height = 14
    Caption = 'Divis'#227'o'
  end
  object gDivisao: TGauge
    Left = 290
    Top = 106
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label32: TLabel
    Left = 201
    Top = 124
    Width = 86
    Height = 14
    Caption = 'Transportadora'
  end
  object gTransp: TGauge
    Left = 290
    Top = 124
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label33: TLabel
    Left = 233
    Top = 142
    Width = 54
    Height = 14
    Caption = 'Cond. Fat.'
  end
  object gCondFat: TGauge
    Left = 290
    Top = 142
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label35: TLabel
    Left = 243
    Top = 160
    Width = 44
    Height = 14
    Caption = 'Produto'
  end
  object gProduto: TGauge
    Left = 290
    Top = 160
    Width = 100
    Height = 15
    Color = clMenu
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label34: TLabel
    Left = 225
    Top = 178
    Width = 62
    Height = 14
    Caption = 'Linha Prod.'
  end
  object gLinP: TGauge
    Left = 290
    Top = 178
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label36: TLabel
    Left = 22
    Top = 519
    Width = 63
    Height = 14
    Caption = 'Item Venda'
  end
  object gItemV: TGauge
    Left = 87
    Top = 520
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label37: TLabel
    Left = 13
    Top = 432
    Width = 72
    Height = 14
    Caption = 'Item Compra'
  end
  object gItemC: TGauge
    Left = 87
    Top = 430
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label38: TLabel
    Left = 212
    Top = 214
    Width = 75
    Height = 14
    Caption = 'Tit. a Receber'
  end
  object gtitc: TGauge
    Left = 290
    Top = 214
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gItpv: TGauge
    Left = 290
    Top = 250
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gPedVda: TGauge
    Left = 290
    Top = 232
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gItpc: TGauge
    Left = 290
    Top = 286
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gPedCpa: TGauge
    Left = 290
    Top = 268
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label39: TLabel
    Left = 201
    Top = 232
    Width = 86
    Height = 14
    Caption = 'Pedidos de Vda'
  end
  object Label40: TLabel
    Left = 218
    Top = 250
    Width = 69
    Height = 14
    Caption = 'Itens de Vda'
  end
  object Label41: TLabel
    Left = 201
    Top = 268
    Width = 86
    Height = 14
    Caption = 'Pedidos de Cpa'
  end
  object Label42: TLabel
    Left = 218
    Top = 286
    Width = 69
    Height = 14
    Caption = 'Itens de Cpa'
  end
  object gItc: TGauge
    Left = 290
    Top = 322
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gCarga: TGauge
    Left = 290
    Top = 304
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label43: TLabel
    Left = 255
    Top = 304
    Width = 32
    Height = 14
    Caption = 'Carga'
  end
  object Label44: TLabel
    Left = 208
    Top = 322
    Width = 79
    Height = 14
    Caption = 'Itens da Carga'
  end
  object gOcorr: TGauge
    Left = 290
    Top = 340
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label47: TLabel
    Left = 220
    Top = 340
    Width = 67
    Height = 14
    Caption = 'Ocorr'#234'ncias'
  end
  object gCauAss: TGauge
    Left = 290
    Top = 358
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label48: TLabel
    Left = 211
    Top = 358
    Width = 76
    Height = 14
    Caption = 'Causa Assist.'
  end
  object gMotivo: TGauge
    Left = 290
    Top = 386
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label49: TLabel
    Left = 217
    Top = 386
    Width = 70
    Height = 14
    Caption = 'Motivo Canc.'
  end
  object gMovim: TGauge
    Left = 290
    Top = 406
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label50: TLabel
    Left = 250
    Top = 406
    Width = 37
    Height = 14
    Caption = 'Movim'
  end
  object gObsNfVda: TGauge
    Left = 290
    Top = 442
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gObsPdVda: TGauge
    Left = 290
    Top = 462
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object gObsPdCpa: TGauge
    Left = 290
    Top = 482
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object Label45: TLabel
    Left = 191
    Top = 442
    Width = 96
    Height = 14
    Caption = 'Obs. NF de Venda'
  end
  object Label46: TLabel
    Left = 194
    Top = 462
    Width = 93
    Height = 14
    Caption = 'Obs. Ped. de Vda'
  end
  object Label51: TLabel
    Left = 194
    Top = 482
    Width = 93
    Height = 14
    Caption = 'Obs. Ped. de Cpa'
  end
  object Label52: TLabel
    Left = 244
    Top = 538
    Width = 45
    Height = 14
    Caption = 'Bordero'
  end
  object gBordero: TGauge
    Left = 291
    Top = 538
    Width = 100
    Height = 15
    Color = clBlack
    ForeColor = clNavy
    Font.Charset = ANSI_CHARSET
    Font.Color = clBackground
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
    Progress = 0
  end
  object BitBtn1: TBitBtn
    Left = 4
    Top = 49
    Width = 75
    Height = 24
    TabOrder = 0
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 176
    Top = 49
    Width = 75
    Height = 25
    Caption = '&Sair'
    TabOrder = 1
    Kind = bkClose
  end
  object edtmasc_hist1: TMaskEdit
    Left = 259
    Top = 51
    Width = 121
    Height = 22
    TabOrder = 2
    Visible = False
  end
  object edtlocal: TDirectoryEdit
    Left = 3
    Top = 25
    Width = 250
    Height = 21
    NumGlyphs = 1
    TabOrder = 3
    Text = 'C:\nutribra\intn'
  end
  object edtMasc_Prod1: TMaskEdit
    Left = 383
    Top = 51
    Width = 121
    Height = 22
    TabOrder = 4
    Text = 'mascara do produto'
    Visible = False
  end
  object DBGrid1: TDBGrid
    Left = 424
    Top = 212
    Width = 320
    Height = 120
    DataSource = dsItemV
    TabOrder = 5
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = [fsBold]
  end
  object DBGrid2: TDBGrid
    Left = 424
    Top = 88
    Width = 320
    Height = 120
    DataSource = dsMovim
    TabOrder = 6
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = [fsBold]
  end
  object edtmasc_hist: TMaskEdit
    Left = 259
    Top = 51
    Width = 121
    Height = 22
    TabOrder = 7
    Text = 'edtmasc_hist'
    Visible = False
  end
  object edtMasc_Prod: TMaskEdit
    Left = 383
    Top = 51
    Width = 121
    Height = 22
    TabOrder = 8
    Text = 'edtMasc_Prod'
    Visible = False
  end
  object dsempresa: TDataSource
    DataSet = tbempresa
    Left = 740
    Top = 59
  end
  object tbempresa: TTable
    DatabaseName = 'c:\crit\industrial\intn'
    TableName = 'CAD_EMPR.DBF'
    Left = 768
    Top = 59
    object tbempresaCOD_EMPR: TStringField
      FieldName = 'COD_EMPR'
      Size = 3
    end
    object tbempresaRAZAO: TStringField
      FieldName = 'RAZAO'
      Size = 40
    end
    object tbempresaCGC: TStringField
      FieldName = 'CGC'
      Size = 18
    end
    object tbempresaINSCEST: TStringField
      FieldName = 'INSCEST'
      Size = 15
    end
    object tbempresaENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tbempresaTELEFONE: TStringField
      FieldName = 'TELEFONE'
      Size = 13
    end
    object tbempresaCIDADE: TStringField
      FieldName = 'CIDADE'
    end
    object tbempresaESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tbempresaCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tbempresaTELEX: TStringField
      FieldName = 'TELEX'
      Size = 10
    end
    object tbempresaFAX: TStringField
      FieldName = 'FAX'
      Size = 13
    end
    object tbempresaCX_POSTAL: TStringField
      FieldName = 'CX_POSTAL'
      Size = 5
    end
    object tbempresaCODC: TStringField
      FieldName = 'CODC'
      Size = 10
    end
    object tbempresaMASCP: TStringField
      FieldName = 'MASCP'
      Size = 10
    end
    object tbempresaMASCQ: TStringField
      FieldName = 'MASCQ'
      Size = 1
    end
    object tbempresaTXJURO: TFloatField
      FieldName = 'TXJURO'
    end
    object tbempresaFLUXOVENDA: TSmallintField
      FieldName = 'FLUXOVENDA'
    end
    object tbempresaFORMULA: TStringField
      FieldName = 'FORMULA'
      Size = 200
    end
    object tbempresaMODELO: TStringField
      FieldName = 'MODELO'
      Size = 1
    end
    object tbempresaCODATIV: TStringField
      FieldName = 'CODATIV'
      Size = 7
    end
    object tbempresaSENHA_EMP: TStringField
      FieldName = 'SENHA_EMP'
      Size = 9
    end
    object tbempresaSENHA_TIT: TStringField
      FieldName = 'SENHA_TIT'
      Size = 9
    end
    object tbempresaSENHA_PED: TStringField
      FieldName = 'SENHA_PED'
      Size = 9
    end
    object tbempresaSENHA_NOT: TStringField
      FieldName = 'SENHA_NOT'
      Size = 9
    end
    object tbempresaAPL_TXJ: TStringField
      FieldName = 'APL_TXJ'
      Size = 1
    end
    object tbempresaAPL_FLV: TStringField
      FieldName = 'APL_FLV'
      Size = 1
    end
    object tbempresaNUM_ITENS: TStringField
      FieldName = 'NUM_ITENS'
      Size = 2
    end
    object tbempresaSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbempresaCONTADOR: TStringField
      FieldName = 'CONTADOR'
      Size = 30
    end
    object tbempresaCRC: TStringField
      FieldName = 'CRC'
      Size = 15
    end
    object tbempresaALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbempresaDATA_REQ: TStringField
      FieldName = 'DATA_REQ'
      Size = 8
    end
    object tbempresaDATA_NOT: TStringField
      FieldName = 'DATA_NOT'
      Size = 8
    end
    object tbempresaDATA_REC: TStringField
      FieldName = 'DATA_REC'
      Size = 8
    end
    object tbempresaDATA_PAG: TStringField
      FieldName = 'DATA_PAG'
      Size = 8
    end
    object tbempresaDATA_BCO: TStringField
      FieldName = 'DATA_BCO'
      Size = 8
    end
    object tbempresaTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbempresaPAD: TBooleanField
      FieldName = 'PAD'
    end
    object tbempresaREV: TBooleanField
      FieldName = 'REV'
    end
    object tbempresaCONJ: TBooleanField
      FieldName = 'CONJ'
    end
    object tbempresaCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 3
    end
    object tbempresaCOD_REVE: TStringField
      FieldName = 'COD_REVE'
      Size = 6
    end
    object tbempresaDIVISOR: TFloatField
      FieldName = 'DIVISOR'
    end
    object tbempresaTIPO_DIV: TStringField
      FieldName = 'TIPO_DIV'
      Size = 1
    end
    object tbempresaTIPO_TIT: TStringField
      FieldName = 'TIPO_TIT'
      Size = 15
    end
    object tbempresaLIBERA: TStringField
      FieldName = 'LIBERA'
      Size = 1
    end
    object tbempresaEMPENHO: TStringField
      FieldName = 'EMPENHO'
      Size = 1
    end
    object tbempresaTRAVA: TBooleanField
      FieldName = 'TRAVA'
    end
    object tbempresaE_MAIL: TStringField
      FieldName = 'E_MAIL'
      Size = 50
    end
    object tbempresaDDG: TStringField
      FieldName = 'DDG'
      Size = 13
    end
    object tbempresaCONSOLIDA: TStringField
      FieldName = 'CONSOLIDA'
      Size = 1
    end
    object tbempresaCONFERE: TStringField
      FieldName = 'CONFERE'
      Size = 1
    end
    object tbempresaVLR_MINDP: TFloatField
      FieldName = 'VLR_MINDP'
    end
  end
  object dshistorico: TDataSource
    DataSet = tbhistorico
    Left = 740
    Top = 88
  end
  object tbhistorico: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'HISTORIC.DBF'
    Left = 768
    Top = 88
    object tbhistoricoCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 6
    end
    object tbhistoricoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
    object tbhistoricoDB: TFloatField
      FieldName = 'DB'
    end
    object tbhistoricoCR: TFloatField
      FieldName = 'CR'
    end
    object tbhistoricoMOEDA: TFloatField
      FieldName = 'MOEDA'
    end
    object tbhistoricoCONTABIL: TStringField
      FieldName = 'CONTABIL'
      Size = 10
    end
    object tbhistoricoHISTP: TStringField
      FieldName = 'HISTP'
      Size = 3
    end
    object tbhistoricoTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbhistoricoPROVISAO: TStringField
      FieldName = 'PROVISAO'
      Size = 10
    end
    object tbhistoricoPROV: TStringField
      FieldName = 'PROV'
      Size = 1
    end
  end
  object dsramo: TDataSource
    DataSet = tbramo
    Left = 740
    Top = 116
  end
  object tbramo: TTable
    DatabaseName = 'c:\crit\industrial\intn\empr_001'
    TableName = 'RAMO.DBF'
    Left = 768
    Top = 116
    object tbramoCOD_RAMO: TStringField
      FieldName = 'COD_RAMO'
      Size = 2
    end
    object tbramoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
  end
  object dslocal: TDataSource
    DataSet = tblocal
    Left = 740
    Top = 144
  end
  object tblocal: TTable
    DatabaseName = 'c:\crit\industrial\intn\empr_001'
    TableName = 'LOCAL.DBF'
    Left = 768
    Top = 144
    object tblocalCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tblocalNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tblocalENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tblocalCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 25
    end
    object tblocalCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tblocalESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tblocalFONE: TStringField
      FieldName = 'FONE'
      Size = 13
    end
    object tblocalTIPO_LOC: TStringField
      FieldName = 'TIPO_LOC'
      Size = 1
    end
  end
  object dstipodoc: TDataSource
    DataSet = tbtipodoc
    Left = 740
    Top = 172
  end
  object tbtipodoc: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'TIPO_DOC.DBF'
    Left = 768
    Top = 172
    object tbtipodocCOD_TDOC: TStringField
      FieldName = 'COD_TDOC'
      Size = 1
    end
    object tbtipodocDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsmoeda: TDataSource
    DataSet = tbmoeda
    Left = 740
    Top = 200
  end
  object tbmoeda: TTable
    DatabaseName = '\industrial'
    TableName = 'MOEDA.DBF'
    Left = 768
    Top = 200
    object tbmoedaCOD_MOED: TStringField
      FieldName = 'COD_MOED'
      Size = 2
    end
    object tbmoedaDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsvmoeda: TDataSource
    DataSet = tbvmoeda
    Left = 740
    Top = 2
  end
  object tbvmoeda: TTable
    DatabaseName = '\industrial'
    TableName = 'VMOEDA.DBF'
    Left = 768
    Top = 2
    object tbvmoedaCOD_MOED: TStringField
      FieldName = 'COD_MOED'
      Size = 2
    end
    object tbvmoedaDATA: TStringField
      FieldName = 'DATA'
      Size = 8
    end
    object tbvmoedaVALOR: TFloatField
      FieldName = 'VALOR'
    end
  end
  object dssublocal: TDataSource
    DataSet = tbsub
    Left = 740
    Top = 396
  end
  object tbsub: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'SUB_LOC.DBF'
    Left = 768
    Top = 396
    object tbsubCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbsubSUB_LOC: TStringField
      FieldName = 'SUB_LOC'
      Size = 3
    end
    object tbsubNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tbsubENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
  end
  object dscfiscal: TDataSource
    DataSet = tbcfiscal
    Left = 740
    Top = 228
  end
  object tbcfiscal: TTable
    DatabaseName = 'T:\jandaia\int'
    TableName = 'COD_FISC.DBF'
    Left = 768
    Top = 228
    object tbcfiscalCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 3
    end
    object tbcfiscalTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbcfiscalDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 35
    end
  end
  object dsnbm: TDataSource
    DataSet = tbnbm
    Left = 740
    Top = 256
  end
  object tbnbm: TTable
    DatabaseName = '\industrial'
    TableName = 'NBM.DBF'
    Left = 768
    Top = 256
    object tbnbmCODIGO: TStringField
      FieldName = 'CODIGO'
      Size = 2
    end
    object tbnbmDESC: TStringField
      FieldName = 'DESC'
      Size = 12
    end
    object tbnbmDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
  end
  object dsregra: TDataSource
    DataSet = tbregra
    Left = 740
    Top = 284
  end
  object tbregra: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'REGRA.DBF'
    Left = 768
    Top = 284
    object tbregraCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbregraNUM_PGTO: TSmallintField
      FieldName = 'NUM_PGTO'
    end
    object tbregraPM_1: TSmallintField
      FieldName = 'PM_1'
    end
    object tbregraFORM_1: TStringField
      FieldName = 'FORM_1'
      Size = 70
    end
    object tbregraPM_2: TSmallintField
      FieldName = 'PM_2'
    end
    object tbregraFORM_2: TStringField
      FieldName = 'FORM_2'
      Size = 70
    end
    object tbregraPM_3: TSmallintField
      FieldName = 'PM_3'
    end
    object tbregraFORM_3: TStringField
      FieldName = 'FORM_3'
      Size = 70
    end
    object tbregraPM_4: TSmallintField
      FieldName = 'PM_4'
    end
    object tbregraFORM_4: TStringField
      FieldName = 'FORM_4'
      Size = 70
    end
    object tbregraPM_5: TSmallintField
      FieldName = 'PM_5'
    end
    object tbregraFORM_5: TStringField
      FieldName = 'FORM_5'
      Size = 70
    end
    object tbregraPM_6: TSmallintField
      FieldName = 'PM_6'
    end
    object tbregraFORM_6: TStringField
      FieldName = 'FORM_6'
      Size = 70
    end
    object tbregraPM_7: TSmallintField
      FieldName = 'PM_7'
    end
    object tbregraFORM_7: TStringField
      FieldName = 'FORM_7'
      Size = 70
    end
    object tbregraPM_8: TSmallintField
      FieldName = 'PM_8'
    end
    object tbregraFORM_8: TStringField
      FieldName = 'FORM_8'
      Size = 70
    end
    object tbregraPM_9: TSmallintField
      FieldName = 'PM_9'
    end
    object tbregraFORM_9: TStringField
      FieldName = 'FORM_9'
      Size = 70
    end
    object tbregraDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 50
    end
  end
  object dsnatureza: TDataSource
    DataSet = tbnat
    Left = 740
    Top = 312
  end
  object tbnat: TTable
    DatabaseName = '\industrial'
    TableName = 'NATOPER.DBF'
    Left = 768
    Top = 312
    object tbnatCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 3
    end
    object tbnatCOD_NAT: TStringField
      FieldName = 'COD_NAT'
      Size = 2
    end
    object tbnatDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 35
    end
    object tbnatCONTA_DB: TStringField
      FieldName = 'CONTA_DB'
      Size = 10
    end
    object tbnatCONTA_CR: TStringField
      FieldName = 'CONTA_CR'
      Size = 10
    end
    object tbnatCOD_FISCN: TStringField
      FieldName = 'COD_FISCN'
      Size = 4
    end
  end
  object dsregiao: TDataSource
    DataSet = tbregiao
    Left = 740
    Top = 368
  end
  object tbregiao: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'REGIAO.DBF'
    Left = 768
    Top = 368
    object tbregiaoCOD_REGI: TStringField
      FieldName = 'COD_REGI'
      Size = 3
    end
    object tbregiaoUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbregiaoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsrep: TDataSource
    DataSet = tbrep
    Left = 740
    Top = 30
  end
  object tbrep: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'VENDEDOR.DBF'
    Left = 768
    Top = 30
    object tbrepCOD_VEND: TStringField
      FieldName = 'COD_VEND'
      Size = 3
    end
    object tbrepNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tbrepRESP: TStringField
      FieldName = 'RESP'
      Size = 40
    end
    object tbrepENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tbrepBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 25
    end
    object tbrepCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 25
    end
    object tbrepESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tbrepFONE: TStringField
      FieldName = 'FONE'
      Size = 13
    end
    object tbrepCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tbrepNUMCONTA: TStringField
      FieldName = 'NUMCONTA'
      Size = 10
    end
    object tbrepAGENCIA: TStringField
      FieldName = 'AGENCIA'
      Size = 10
    end
    object tbrepBANCO: TStringField
      FieldName = 'BANCO'
      Size = 30
    end
    object tbrepCOMISSAO: TFloatField
      FieldName = 'COMISSAO'
    end
    object tbrepCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbrepCPF: TStringField
      FieldName = 'CPF'
      Size = 11
    end
    object tbrepINSCEST: TStringField
      FieldName = 'INSCEST'
      Size = 16
    end
    object tbrepDATAINA: TStringField
      FieldName = 'DATAINA'
      Size = 8
    end
    object tbrepRG: TStringField
      FieldName = 'RG'
      Size = 12
    end
    object tbrepDATACAD: TStringField
      FieldName = 'DATACAD'
      Size = 8
    end
    object tbrepOBS: TMemoField
      FieldName = 'OBS'
      BlobType = ftMemo
      Size = 1
    end
    object tbrepSD_INICA: TFloatField
      FieldName = 'SD_INICA'
    end
    object tbrepSD_INICR: TFloatField
      FieldName = 'SD_INICR'
    end
  end
  object dsconta: TDataSource
    DataSet = tbconta
    Left = 740
    Top = 340
  end
  object tbconta: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'BANCO.DBF'
    Left = 768
    Top = 340
    object tbcontaCOD_BANC: TStringField
      FieldName = 'COD_BANC'
      Size = 3
    end
    object tbcontaRESP: TStringField
      FieldName = 'RESP'
      Size = 40
    end
    object tbcontaNUMCONTA: TStringField
      FieldName = 'NUMCONTA'
      Size = 13
    end
    object tbcontaAGENCIA: TStringField
      FieldName = 'AGENCIA'
      Size = 10
    end
    object tbcontaDATA: TStringField
      FieldName = 'DATA'
      Size = 8
    end
    object tbcontaSALDO: TFloatField
      FieldName = 'SALDO'
    end
    object tbcontaBANCO: TStringField
      FieldName = 'BANCO'
      Size = 40
    end
    object tbcontaTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbcontaTIPO_CTA: TStringField
      FieldName = 'TIPO_CTA'
      Size = 1
    end
    object tbcontaCEDENTE: TStringField
      FieldName = 'CEDENTE'
      Size = 7
    end
    object tbcontaRAZAO: TStringField
      FieldName = 'RAZAO'
      Size = 40
    end
    object tbcontaLIMITE: TFloatField
      FieldName = 'LIMITE'
    end
    object tbcontaCONTABIL: TStringField
      FieldName = 'CONTABIL'
      Size = 10
    end
  end
  object dsfor: TDataSource
    DataSet = tbfor
    Left = 680
    Top = 2
  end
  object tbfor: TTable
    DatabaseName = 'c:\crit\industrial\intn\empr_001'
    TableName = 'FORNECED.DBF'
    Left = 708
    Top = 2
    object tbforCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbforPESSOA: TStringField
      FieldName = 'PESSOA'
      Size = 1
    end
    object tbforNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tbforENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tbforFANTASIA: TStringField
      FieldName = 'FANTASIA'
      Size = 25
    end
    object tbforFONE: TStringField
      FieldName = 'FONE'
      Size = 13
    end
    object tbforCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 25
    end
    object tbforESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tbforCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tbforINSCEST: TStringField
      FieldName = 'INSCEST'
      Size = 18
    end
    object tbforSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 5
    end
    object tbforTELEX: TStringField
      FieldName = 'TELEX'
      Size = 10
    end
    object tbforFAX: TStringField
      FieldName = 'FAX'
      Size = 13
    end
    object tbforCONTATO: TStringField
      FieldName = 'CONTATO'
    end
    object tbforBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 25
    end
    object tbforRAMO: TStringField
      FieldName = 'RAMO'
      Size = 2
    end
    object tbforCONTABIL: TStringField
      FieldName = 'CONTABIL'
      Size = 10
    end
    object tbforOBSER: TMemoField
      FieldName = 'OBSER'
      BlobType = ftMemo
      Size = 10
    end
    object tbforCOND_FAT: TStringField
      FieldName = 'COND_FAT'
    end
    object tbforDATACAD: TStringField
      FieldName = 'DATACAD'
      Size = 8
    end
    object tbforDATAINA: TStringField
      FieldName = 'DATAINA'
      Size = 8
    end
    object tbforE_MAIL: TStringField
      FieldName = 'E_MAIL'
      Size = 50
    end
    object tbforCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbforBLOQUEADO: TBooleanField
      FieldName = 'BLOQUEADO'
    end
  end
  object dstitd: TDataSource
    DataSet = tbtitd
    Left = 740
    Top = 508
  end
  object tbtitd: TTable
    DatabaseName = 'c:\crit\industrial\intn\empr_001'
    TableName = 'TITDEB.DBF'
    Left = 768
    Top = 508
    object tbtitdCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbtitdNUM_DOC: TStringField
      FieldName = 'NUM_DOC'
      Size = 11
    end
    object tbtitdVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object tbtitdDATAVENC: TStringField
      FieldName = 'DATAVENC'
      Size = 8
    end
    object tbtitdDATAEMIS: TStringField
      FieldName = 'DATAEMIS'
      Size = 8
    end
    object tbtitdDATAPGTO: TStringField
      FieldName = 'DATAPGTO'
      Size = 8
    end
    object tbtitdDATABASE: TStringField
      FieldName = 'DATABASE'
      Size = 8
    end
    object tbtitdDESC: TFloatField
      FieldName = 'DESC'
    end
    object tbtitdDATADESC: TStringField
      FieldName = 'DATADESC'
      Size = 8
    end
    object tbtitdVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object tbtitdNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbtitdSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbtitdJURO: TFloatField
      FieldName = 'JURO'
    end
    object tbtitdDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbtitdVAR_CAMB: TFloatField
      FieldName = 'VAR_CAMB'
    end
    object tbtitdTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbtitdTIPO_DOC: TStringField
      FieldName = 'TIPO_DOC'
      Size = 1
    end
    object tbtitdOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbtitdOBS2: TStringField
      FieldName = 'OBS2'
      Size = 40
    end
    object tbtitdCOD_MOED: TStringField
      FieldName = 'COD_MOED'
      Size = 2
    end
    object tbtitdCOD_BANC: TStringField
      FieldName = 'COD_BANC'
      Size = 3
    end
    object tbtitdCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 6
    end
    object tbtitdDESP_CART: TFloatField
      FieldName = 'DESP_CART'
    end
    object tbtitdCONF: TStringField
      FieldName = 'CONF'
      Size = 1
    end
    object tbtitdPROVISAO: TStringField
      FieldName = 'PROVISAO'
      Size = 1
    end
    object tbtitdBAIXA: TStringField
      FieldName = 'BAIXA'
      Size = 1
    end
    object tbtitdAUTORIZ: TStringField
      FieldName = 'AUTORIZ'
      Size = 1
    end
    object tbtitdCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbtitdDATADIGI: TStringField
      FieldName = 'DATADIGI'
      Size = 8
    end
    object tbtitdNUM_EMP: TStringField
      FieldName = 'NUM_EMP'
      Size = 9
    end
    object tbtitdPARCIAL: TStringField
      FieldName = 'PARCIAL'
      Size = 1
    end
    object tbtitdNUM_PARC: TStringField
      FieldName = 'NUM_PARC'
      Size = 11
    end
    object tbtitdMES_REF: TStringField
      FieldName = 'MES_REF'
      Size = 6
    end
  end
  object dstb: TDataSource
    DataSet = tpb
    Left = 740
    Top = 480
  end
  object tpb: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'TIPO_BAI.DBF'
    Left = 768
    Top = 480
    object tpbCOD_TBAI: TStringField
      FieldName = 'COD_TBAI'
      Size = 2
    end
    object tpbDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 10
    end
  end
  object dsnfcpa: TDataSource
    DataSet = tbnfcpa
    Left = 680
    Top = 396
  end
  object dstp: TDataSource
    DataSet = tbtp
    Left = 740
    Top = 452
  end
  object tbtp: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'TIPO_PED.DBF'
    Left = 768
    Top = 452
    object tbtpTIPO: TStringField
      FieldName = 'TIPO'
      Size = 2
    end
    object tbtpDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
  end
  object dsrm: TDataSource
    DataSet = tbmr
    Left = 740
    Top = 424
  end
  object tbmr: TTable
    DatabaseName = '\industrial\empr_001'
    TableName = 'VEND_MOV.DBF'
    Left = 768
    Top = 424
    object tbmrCOD_VEND: TStringField
      FieldName = 'COD_VEND'
      Size = 3
    end
    object tbmrDATA: TStringField
      FieldName = 'DATA'
      Size = 8
    end
    object tbmrHIST: TStringField
      FieldName = 'HIST'
      Size = 40
    end
    object tbmrHIST2: TStringField
      FieldName = 'HIST2'
      Size = 40
    end
    object tbmrTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbmrVALOR: TFloatField
      FieldName = 'VALOR'
    end
  end
  object tbUF: TTable
    DatabaseName = 'T:\jandaia\int'
    TableName = 'ESTADO.DBF'
    Left = 707
    Top = 30
    object tbUFUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbUFNOME: TStringField
      FieldName = 'NOME'
    end
    object tbUFPER_ICM: TFloatField
      FieldName = 'PER_ICM'
    end
    object tbUFPER_FRET: TFloatField
      FieldName = 'PER_FRET'
    end
  end
  object dsUF: TDataSource
    DataSet = tbUF
    Left = 679
    Top = 30
  end
  object tbGrupo: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'GRUPO.DBF'
    Left = 708
    Top = 59
    object tbGrupoCOD_GRUP: TStringField
      FieldName = 'COD_GRUP'
      Size = 3
    end
    object tbGrupoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 30
    end
  end
  object dsGrupo: TDataSource
    DataSet = tbGrupo
    Left = 680
    Top = 59
  end
  object tbCli: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'CLIENTE.DBF'
    Left = 708
    Top = 88
    object tbCliCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbCliPESSOA: TStringField
      FieldName = 'PESSOA'
      Size = 1
    end
    object tbCliNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tbCliENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tbCliFANTASIA: TStringField
      FieldName = 'FANTASIA'
      Size = 25
    end
    object tbCliFONE: TStringField
      FieldName = 'FONE'
      Size = 13
    end
    object tbCliCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 25
    end
    object tbCliESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tbCliCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tbCliCOD_REGI: TStringField
      FieldName = 'COD_REGI'
      Size = 3
    end
    object tbCliINSCEST: TStringField
      FieldName = 'INSCEST'
      Size = 21
    end
    object tbCliCONTATO: TStringField
      FieldName = 'CONTATO'
    end
    object tbCliCOD_VEND: TStringField
      FieldName = 'COD_VEND'
      Size = 3
    end
    object tbCliCOD_SUPER: TStringField
      FieldName = 'COD_SUPER'
      Size = 3
    end
    object tbCliCOD_LIN: TStringField
      FieldName = 'COD_LIN'
      Size = 2
    end
    object tbCliCLASSIF: TStringField
      FieldName = 'CLASSIF'
      Size = 10
    end
    object tbCliNIVER: TStringField
      FieldName = 'NIVER'
      Size = 5
    end
    object tbCliSTATUS: TStringField
      FieldName = 'STATUS'
      Size = 5
    end
    object tbCliOBSERV: TMemoField
      FieldName = 'OBSERV'
      BlobType = ftMemo
      Size = 1
    end
    object tbCliTELEX: TStringField
      FieldName = 'TELEX'
      Size = 10
    end
    object tbCliFAX: TStringField
      FieldName = 'FAX'
      Size = 13
    end
    object tbCliDATACAD: TStringField
      FieldName = 'DATACAD'
      Size = 8
    end
    object tbCliDATAINA: TStringField
      FieldName = 'DATAINA'
      Size = 8
    end
    object tbCliLIMITE: TFloatField
      FieldName = 'LIMITE'
    end
    object tbCliBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 25
    end
    object tbCliLOCOBR: TStringField
      FieldName = 'LOCOBR'
      Size = 60
    end
    object tbCliCEP_COBR: TStringField
      FieldName = 'CEP_COBR'
      Size = 8
    end
    object tbCliNUM_FIL: TSmallintField
      FieldName = 'NUM_FIL'
    end
    object tbCliCONTABIL: TStringField
      FieldName = 'CONTABIL'
      Size = 10
    end
    object tbCliBLOQUEADO: TStringField
      FieldName = 'BLOQUEADO'
      Size = 1
    end
    object tbCliCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbCliSUB_LOC: TStringField
      FieldName = 'SUB_LOC'
      Size = 3
    end
    object tbCliEND_ENT: TStringField
      FieldName = 'END_ENT'
      Size = 40
    end
    object tbCliCID_ENT: TStringField
      FieldName = 'CID_ENT'
      Size = 25
    end
    object tbCliEST_ENT: TStringField
      FieldName = 'EST_ENT'
      Size = 2
    end
    object tbCliTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbCliE_MAIL: TStringField
      FieldName = 'E_MAIL'
      Size = 50
    end
    object tbCliEND_COBR: TStringField
      FieldName = 'END_COBR'
      Size = 40
    end
    object tbCliBAI_COBR: TStringField
      FieldName = 'BAI_COBR'
      Size = 25
    end
    object tbCliCID_COBR: TStringField
      FieldName = 'CID_COBR'
      Size = 25
    end
    object tbCliEST_COBR: TStringField
      FieldName = 'EST_COBR'
      Size = 2
    end
    object tbCliBAI_ENT: TStringField
      FieldName = 'BAI_ENT'
      Size = 25
    end
    object tbCliCOD_ROTA: TStringField
      FieldName = 'COD_ROTA'
      Size = 3
    end
    object tbCliCOD_GRUP: TStringField
      FieldName = 'COD_GRUP'
      Size = 3
    end
    object tbCliSUFRAMA: TStringField
      FieldName = 'SUFRAMA'
      Size = 1
    end
    object tbCliIS_ICMS: TStringField
      FieldName = 'IS_ICMS'
      Size = 1
    end
    object tbCliIS_IPI: TStringField
      FieldName = 'IS_IPI'
      Size = 1
    end
  end
  object dsCli: TDataSource
    DataSet = tbCli
    Left = 680
    Top = 88
  end
  object dsLinVen: TDataSource
    DataSet = tbLinVen
    Left = 680
    Top = 116
  end
  object tbLinVen: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'LINHA.DBF'
    Left = 708
    Top = 116
    object tbLinVenCOD_VEND: TStringField
      FieldName = 'COD_VEND'
      Size = 3
    end
    object tbLinVenCOD_LIN: TStringField
      FieldName = 'COD_LIN'
      Size = 2
    end
    object tbLinVenDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
  end
  object dsnfven: TDataSource
    DataSet = tbnfven
    Left = 680
    Top = 144
  end
  object dsDivisao: TDataSource
    DataSet = tbDivisao
    Left = 680
    Top = 172
  end
  object tbDivisao: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'DIVISAO.DBF'
    Left = 708
    Top = 172
    object tbDivisaoCOD_DIVI: TStringField
      FieldName = 'COD_DIVI'
      Size = 2
    end
    object tbDivisaoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsTransp: TDataSource
    DataSet = tbTransp
    Left = 680
    Top = 200
  end
  object tbTransp: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'TRANSP.DBF'
    Left = 708
    Top = 200
    object tbTranspCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbTranspNOME: TStringField
      FieldName = 'NOME'
      Size = 40
    end
    object tbTranspENDER: TStringField
      FieldName = 'ENDER'
      Size = 40
    end
    object tbTranspCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 25
    end
    object tbTranspESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object tbTranspPLACA: TStringField
      FieldName = 'PLACA'
      Size = 7
    end
    object tbTranspUF_PLACA: TStringField
      FieldName = 'UF_PLACA'
      Size = 2
    end
    object tbTranspCPF_CGC: TStringField
      FieldName = 'CPF_CGC'
      Size = 18
    end
    object tbTranspINSCEST: TStringField
      FieldName = 'INSCEST'
      Size = 16
    end
    object tbTranspFONE: TStringField
      FieldName = 'FONE'
      Size = 17
    end
    object tbTranspDATA_INA: TStringField
      FieldName = 'DATA_INA'
      Size = 8
    end
    object tbTranspOBS: TMemoField
      FieldName = 'OBS'
      BlobType = ftMemo
      Size = 1
    end
    object tbTranspDATA_CAD: TStringField
      FieldName = 'DATA_CAD'
      Size = 8
    end
    object tbTranspDATA_CAR: TStringField
      FieldName = 'DATA_CAR'
      Size = 10
    end
    object tbTranspBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 25
    end
    object tbTranspCEP: TStringField
      FieldName = 'CEP'
      Size = 8
    end
    object tbTranspCONTATO: TStringField
      FieldName = 'CONTATO'
      Size = 30
    end
    object tbTranspFAX: TStringField
      FieldName = 'FAX'
      Size = 13
    end
    object tbTranspE_MAIL: TStringField
      FieldName = 'E_MAIL'
      Size = 50
    end
    object tbTranspREGIAO: TStringField
      FieldName = 'REGIAO'
      Size = 40
    end
    object tbTranspRG: TStringField
      FieldName = 'RG'
      Size = 12
    end
    object tbTranspOEM: TStringField
      FieldName = 'OEM'
      Size = 13
    end
    object tbTranspPREV: TStringField
      FieldName = 'PREV'
      Size = 15
    end
  end
  object tbTaxa: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'TAXA_FOR.DBF'
    Left = 708
    Top = 228
    object tbTaxaCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
    object tbTaxaALFA: TFloatField
      FieldName = 'ALFA'
    end
    object tbTaxaALFR: TFloatField
      FieldName = 'ALFR'
    end
  end
  object dsTaxa: TDataSource
    DataSet = tbTaxa
    Left = 680
    Top = 228
  end
  object dsNota: TDataSource
    DataSet = tbNota
    Left = 680
    Top = 256
  end
  object tbNota: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'NOTA.DBF'
    Left = 708
    Top = 256
    object tbNotaTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbNotaTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbNotaALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbNotaCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
  end
  object tbProd: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'PRODUTO.DBF'
    Left = 708
    Top = 284
    object tbProdCOD_PROD: TStringField
      FieldName = 'COD_PROD'
      Size = 6
    end
    object tbProdUNIDADE: TStringField
      FieldName = 'UNIDADE'
      Size = 3
    end
    object tbProdPESO_LIQ: TFloatField
      FieldName = 'PESO_LIQ'
    end
    object tbProdPESO_BRU: TFloatField
      FieldName = 'PESO_BRU'
    end
    object tbProdCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbProdNBM: TStringField
      FieldName = 'NBM'
      Size = 2
    end
    object tbProdNUM_EMB: TFloatField
      FieldName = 'NUM_EMB'
    end
    object tbProdNUM_VID: TSmallintField
      FieldName = 'NUM_VID'
    end
    object tbProdUNID_VID: TStringField
      FieldName = 'UNID_VID'
      Size = 3
    end
    object tbProdASSENTO: TStringField
      FieldName = 'ASSENTO'
      Size = 1
    end
    object tbProdPORC_IPI: TFloatField
      FieldName = 'PORC_IPI'
    end
    object tbProdPRECO_VEND: TFloatField
      FieldName = 'PRECO_VEND'
    end
    object tbProdAUMENTO: TFloatField
      FieldName = 'AUMENTO'
    end
    object tbProdDT_SDINI: TStringField
      FieldName = 'DT_SDINI'
      Size = 8
    end
    object tbProdELABORACAO: TFloatField
      FieldName = 'ELABORACAO'
    end
    object tbProdDIV_TAB: TFloatField
      FieldName = 'DIV_TAB'
    end
    object tbProdALTURA: TFloatField
      FieldName = 'ALTURA'
    end
    object tbProdESPESSURA: TSmallintField
      FieldName = 'ESPESSURA'
    end
    object tbProdLARGURA: TFloatField
      FieldName = 'LARGURA'
    end
    object tbProdPROFUNDI: TFloatField
      FieldName = 'PROFUNDI'
    end
    object tbProdATIVO: TStringField
      FieldName = 'ATIVO'
      Size = 1
    end
    object tbProdIMP_PECA: TStringField
      FieldName = 'IMP_PECA'
      Size = 1
    end
    object tbProdCOD_LIN: TStringField
      FieldName = 'COD_LIN'
      Size = 2
    end
    object tbProdEST_MIN: TFloatField
      FieldName = 'EST_MIN'
    end
    object tbProdESTOQUE: TStringField
      FieldName = 'ESTOQUE'
      Size = 1
    end
    object tbProdIMAGEM: TStringField
      FieldName = 'IMAGEM'
      Size = 50
    end
    object tbProdPRODUCAO: TStringField
      FieldName = 'PRODUCAO'
      Size = 1
    end
    object tbProdTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbProdDESCP1: TFloatField
      FieldName = 'DESCP1'
    end
    object tbProdDESCP2: TFloatField
      FieldName = 'DESCP2'
    end
    object tbProdDESCP3: TFloatField
      FieldName = 'DESCP3'
    end
    object tbProdVOLUME: TFloatField
      FieldName = 'VOLUME'
    end
    object tbProdCOD_MATP: TStringField
      FieldName = 'COD_MATP'
      Size = 6
    end
    object tbProdEMP_MAX: TFloatField
      FieldName = 'EMP_MAX'
    end
    object tbProdCOD_MODE: TStringField
      FieldName = 'COD_MODE'
      Size = 4
    end
    object tbProdCOD_ESTI: TStringField
      FieldName = 'COD_ESTI'
      Size = 2
    end
  end
  object dsProd: TDataSource
    DataSet = tbProd
    Left = 680
    Top = 284
  end
  object dsCCusto: TDataSource
    DataSet = tbCCusto
    Left = 680
    Top = 312
  end
  object tbCCusto: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'C_CUSTO.DBF'
    Left = 708
    Top = 312
    object tbCCustoCOD_CC: TStringField
      FieldName = 'COD_CC'
      Size = 1
    end
    object tbCCustoTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbCCustoCOD_PROD: TStringField
      FieldName = 'COD_PROD'
      Size = 7
    end
    object tbCCustoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
    object tbCCustoSALDO: TFloatField
      FieldName = 'SALDO'
    end
    object tbCCustoULT_CUSTO: TFloatField
      FieldName = 'ULT_CUSTO'
    end
    object tbCCustoCUSTO_MED: TFloatField
      FieldName = 'CUSTO_MED'
    end
    object tbCCustoCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbCCustoULT_ENT: TStringField
      FieldName = 'ULT_ENT'
      Size = 8
    end
    object tbCCustoULT_SAI: TStringField
      FieldName = 'ULT_SAI'
      Size = 8
    end
    object tbCCustoCUSTO_REP: TFloatField
      FieldName = 'CUSTO_REP'
    end
    object tbCCustoRESERVA: TFloatField
      FieldName = 'RESERVA'
    end
  end
  object dsLinPro: TDataSource
    DataSet = tbLinPro
    Left = 680
    Top = 340
  end
  object tbLinPro: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    FieldDefs = <
      item
        Name = 'COD_LIN'
        DataType = ftString
        Size = 2
      end
      item
        Name = 'DESCRICAO'
        DataType = ftString
        Size = 20
      end>
    StoreDefs = True
    TableName = 'LINHA_P.DBF'
    Left = 708
    Top = 340
    object tbLinProCOD_LIN: TStringField
      FieldName = 'COD_LIN'
      Size = 2
    end
    object tbLinProDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
  end
  object dsItemV: TDataSource
    DataSet = tbItemV
    Left = 680
    Top = 368
  end
  object tbItemV: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    DataSource = dsnfven
    SQL.Strings = (
      'Select distinct *'
      'from Itemv'
      'Where Tipo = '#39'A'#39
      'and NUM_NF =:NUM_NF AND SERIE =:SERIE AND CGC =:CGC'
      'Order by Num_Nf, Serie, CGC')
    Left = 708
    Top = 368
    ParamData = <
      item
        DataType = ftString
        Name = 'NUM_NF'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'SERIE'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'CGC'
        ParamType = ptUnknown
      end>
    object tbItemVTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbItemVNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbItemVSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbItemVCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbItemVCOD_PROD: TStringField
      FieldName = 'COD_PROD'
      Size = 7
    end
    object tbItemVCOD_REV: TStringField
      FieldName = 'COD_REV'
      Size = 7
    end
    object tbItemVCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbItemVCOD_CC: TStringField
      FieldName = 'COD_CC'
      Size = 1
    end
    object tbItemVQTDE: TFloatField
      FieldName = 'QTDE'
    end
    object tbItemVDATA_MOV: TStringField
      FieldName = 'DATA_MOV'
      Size = 8
    end
    object tbItemVPRECO_VEND: TFloatField
      FieldName = 'PRECO_VEND'
    end
    object tbItemVCUSTO_MED: TFloatField
      FieldName = 'CUSTO_MED'
    end
    object tbItemVPORC_IPI: TFloatField
      FieldName = 'PORC_IPI'
    end
    object tbItemVDESC_TAB: TFloatField
      FieldName = 'DESC_TAB'
    end
    object tbItemVDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbItemVNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbItemVCOD_CONJ: TStringField
      FieldName = 'COD_CONJ'
      Size = 7
    end
  end
  object tbnfven: TQuery
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    SQL.Strings = (
      'Select * from Nota'
      'where Tipo = '#39'A'#39
      'Order by Num_Nf, Serie, Cgc')
    Left = 708
    Top = 144
    object tbnfvenTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbnfvenNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbnfvenNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbnfvenSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbnfvenESPECIE: TStringField
      FieldName = 'ESPECIE'
      Size = 5
    end
    object tbnfvenNUM_FUT: TStringField
      FieldName = 'NUM_FUT'
      Size = 9
    end
    object tbnfvenCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbnfvenDATA_ENT: TStringField
      FieldName = 'DATA_ENT'
      Size = 8
    end
    object tbnfvenDATA_PED: TStringField
      FieldName = 'DATA_PED'
      Size = 8
    end
    object tbnfvenDATA_FAT: TStringField
      FieldName = 'DATA_FAT'
      Size = 8
    end
    object tbnfvenDATA_SAI: TStringField
      FieldName = 'DATA_SAI'
      Size = 8
    end
    object tbnfvenDATA_CHE: TStringField
      FieldName = 'DATA_CHE'
      Size = 8
    end
    object tbnfvenCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 4
    end
    object tbnfvenCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbnfvenCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbnfvenCOD_REPRES: TStringField
      FieldName = 'COD_REPRES'
      Size = 3
    end
    object tbnfvenCOD_SUPER: TStringField
      FieldName = 'COD_SUPER'
      Size = 3
    end
    object tbnfvenCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbnfvenALIQ_IPI: TFloatField
      FieldName = 'ALIQ_IPI'
    end
    object tbnfvenALIQ_ICM: TFloatField
      FieldName = 'ALIQ_ICM'
    end
    object tbnfvenALIQ_DICM: TFloatField
      FieldName = 'ALIQ_DICM'
    end
    object tbnfvenB_CAL_IPI: TFloatField
      FieldName = 'B_CAL_IPI'
    end
    object tbnfvenB_CAL_ICM: TFloatField
      FieldName = 'B_CAL_ICM'
    end
    object tbnfvenB_CAL_DICM: TFloatField
      FieldName = 'B_CAL_DICM'
    end
    object tbnfvenIPI: TFloatField
      FieldName = 'IPI'
    end
    object tbnfvenICMS: TFloatField
      FieldName = 'ICMS'
    end
    object tbnfvenDICMS: TFloatField
      FieldName = 'DICMS'
    end
    object tbnfvenISENTA_IPI: TFloatField
      FieldName = 'ISENTA_IPI'
    end
    object tbnfvenISENTA_ICM: TFloatField
      FieldName = 'ISENTA_ICM'
    end
    object tbnfvenOUTRAS_IPI: TFloatField
      FieldName = 'OUTRAS_IPI'
    end
    object tbnfvenOUTRAS_ICM: TFloatField
      FieldName = 'OUTRAS_ICM'
    end
    object tbnfvenVAL_CONT: TFloatField
      FieldName = 'VAL_CONT'
    end
    object tbnfvenFRETE: TFloatField
      FieldName = 'FRETE'
    end
    object tbnfvenALIQ_FRET: TFloatField
      FieldName = 'ALIQ_FRET'
    end
    object tbnfvenSEGURO: TFloatField
      FieldName = 'SEGURO'
    end
    object tbnfvenALIQ_SEG: TFloatField
      FieldName = 'ALIQ_SEG'
    end
    object tbnfvenDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbnfvenPERC_DESC: TFloatField
      FieldName = 'PERC_DESC'
    end
    object tbnfvenEMBALAGEM: TFloatField
      FieldName = 'EMBALAGEM'
    end
    object tbnfvenALIQ_EMB: TFloatField
      FieldName = 'ALIQ_EMB'
    end
    object tbnfvenENCARGOS: TFloatField
      FieldName = 'ENCARGOS'
    end
    object tbnfvenALIQ_ENC: TFloatField
      FieldName = 'ALIQ_ENC'
    end
    object tbnfvenTOTAL_PROD: TFloatField
      FieldName = 'TOTAL_PROD'
    end
    object tbnfvenQTDE_ITENS: TFloatField
      FieldName = 'QTDE_ITENS'
    end
    object tbnfvenQTDE_EMB: TFloatField
      FieldName = 'QTDE_EMB'
    end
    object tbnfvenESP_EMB: TStringField
      FieldName = 'ESP_EMB'
      Size = 10
    end
    object tbnfvenMARCA_EMPR: TStringField
      FieldName = 'MARCA_EMPR'
      Size = 14
    end
    object tbnfvenPESO_LIQ: TFloatField
      FieldName = 'PESO_LIQ'
    end
    object tbnfvenPESO_BRU: TFloatField
      FieldName = 'PESO_BRU'
    end
    object tbnfvenNUM_PGTO: TSmallintField
      FieldName = 'NUM_PGTO'
    end
    object tbnfvenPRAZO_MED: TSmallintField
      FieldName = 'PRAZO_MED'
    end
    object tbnfvenORD_ENT: TSmallintField
      FieldName = 'ORD_ENT'
    end
    object tbnfvenALIQ_COM: TFloatField
      FieldName = 'ALIQ_COM'
    end
    object tbnfvenCOMISSAO: TFloatField
      FieldName = 'COMISSAO'
    end
    object tbnfvenALIQ_SUP: TFloatField
      FieldName = 'ALIQ_SUP'
    end
    object tbnfvenOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbnfvenINSC_SUBS: TStringField
      FieldName = 'INSC_SUBS'
      Size = 18
    end
    object tbnfvenB_CAL_SUBS: TFloatField
      FieldName = 'B_CAL_SUBS'
    end
    object tbnfvenALIQ_SUBS: TFloatField
      FieldName = 'ALIQ_SUBS'
    end
    object tbnfvenICMS_SUBS: TFloatField
      FieldName = 'ICMS_SUBS'
    end
    object tbnfvenHORA_SAI: TStringField
      FieldName = 'HORA_SAI'
      Size = 6
    end
    object tbnfvenCOD_FORM: TStringField
      FieldName = 'COD_FORM'
      Size = 2
    end
    object tbnfvenMOTORISTA: TStringField
      FieldName = 'MOTORISTA'
      Size = 30
    end
    object tbnfvenPLACA_VEIC: TStringField
      FieldName = 'PLACA_VEIC'
      Size = 7
    end
    object tbnfvenVIA_TRANSP: TStringField
      FieldName = 'VIA_TRANSP'
      Size = 10
    end
    object tbnfvenNUM_NF2: TStringField
      FieldName = 'NUM_NF2'
      Size = 9
    end
    object tbnfvenTIPO_LF: TStringField
      FieldName = 'TIPO_LF'
      Size = 2
    end
    object tbnfvenDIFERIDAS: TFloatField
      FieldName = 'DIFERIDAS'
    end
    object tbnfvenCONTA_DB: TStringField
      FieldName = 'CONTA_DB'
      Size = 10
    end
    object tbnfvenCONTA_CR: TStringField
      FieldName = 'CONTA_CR'
      Size = 10
    end
    object tbnfvenTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbnfvenALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbnfvenNUM_FAB: TStringField
      FieldName = 'NUM_FAB'
      Size = 9
    end
    object tbnfvenTIPO_FR: TStringField
      FieldName = 'TIPO_FR'
      Size = 1
    end
    object tbnfvenPED_CLIE: TStringField
      FieldName = 'PED_CLIE'
      Size = 9
    end
    object tbnfvenCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbnfvenLIBERA: TStringField
      FieldName = 'LIBERA'
      Size = 1
    end
    object tbnfvenNUM_ORD: TStringField
      FieldName = 'NUM_ORD'
      Size = 6
    end
    object tbnfvenCOND_FAT: TStringField
      FieldName = 'COND_FAT'
    end
    object tbnfvenUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbnfvenOBS_LF: TStringField
      FieldName = 'OBS_LF'
      Size = 40
    end
    object tbnfvenCOD_NAT: TStringField
      FieldName = 'COD_NAT'
      Size = 2
    end
    object tbnfvenCONFERIDO: TStringField
      FieldName = 'CONFERIDO'
      Size = 1
    end
    object tbnfvenCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbnfvenCOD_TAB: TStringField
      FieldName = 'COD_TAB'
      Size = 2
    end
    object tbnfvenPRECO: TStringField
      FieldName = 'PRECO'
      Size = 1
    end
    object tbnfvenDESC1: TFloatField
      FieldName = 'DESC1'
    end
    object tbnfvenDESC2: TFloatField
      FieldName = 'DESC2'
    end
    object tbnfvenDESC3: TFloatField
      FieldName = 'DESC3'
    end
    object tbnfvenDESC4: TFloatField
      FieldName = 'DESC4'
    end
    object tbnfvenDESC5: TFloatField
      FieldName = 'DESC5'
    end
    object tbnfvenDESC6: TFloatField
      FieldName = 'DESC6'
    end
    object tbnfvenDESC7: TFloatField
      FieldName = 'DESC7'
    end
    object tbnfvenDESC8: TFloatField
      FieldName = 'DESC8'
    end
    object tbnfvenDESC9: TFloatField
      FieldName = 'DESC9'
    end
    object tbnfvenB_CAL_ICFR: TFloatField
      FieldName = 'B_CAL_ICFR'
    end
    object tbnfvenEMITENTE: TStringField
      FieldName = 'EMITENTE'
      Size = 1
    end
    object tbnfvenREDESP: TStringField
      FieldName = 'REDESP'
      Size = 1
    end
    object tbnfvenNUM_RE: TStringField
      FieldName = 'NUM_RE'
      Size = 12
    end
    object tbnfvenDATA_DIGI: TStringField
      FieldName = 'DATA_DIGI'
      Size = 8
    end
    object tbnfvenFRETE_CTA: TStringField
      FieldName = 'FRETE_CTA'
      Size = 1
    end
    object tbnfvenCOD_MOTI: TStringField
      FieldName = 'COD_MOTI'
      Size = 3
    end
    object tbnfvenDATA_LIB: TStringField
      FieldName = 'DATA_LIB'
      Size = 8
    end
    object tbnfvenIMP_PED: TStringField
      FieldName = 'IMP_PED'
      Size = 1
    end
    object tbnfvenIMP_NF: TStringField
      FieldName = 'IMP_NF'
      Size = 1
    end
    object tbnfvenCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbnfvenRETIRA: TStringField
      FieldName = 'RETIRA'
      Size = 1
    end
    object tbnfvenCOD_RDSP: TStringField
      FieldName = 'COD_RDSP'
      Size = 3
    end
    object tbnfvenCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
    object tbnfvenPED_REPR: TStringField
      FieldName = 'PED_REPR'
      Size = 9
    end
    object tbnfvenTIPO_PED: TStringField
      FieldName = 'TIPO_PED'
      Size = 2
    end
    object tbnfvenSITUACAO: TStringField
      FieldName = 'SITUACAO'
      Size = 2
    end
    object tbnfvenNUM_CARGA: TStringField
      FieldName = 'NUM_CARGA'
      Size = 6
    end
    object tbnfvenNUM_AUT: TStringField
      FieldName = 'NUM_AUT'
      Size = 6
    end
    object tbnfvenTIPO_DIGI: TStringField
      FieldName = 'TIPO_DIGI'
      Size = 1
    end
    object tbnfvenDESC_COM: TFloatField
      FieldName = 'DESC_COM'
    end
  end
  object tbnfcpa: TQuery
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    SQL.Strings = (
      'Select * from Nota'
      'where  tipo = '#39'E'#39
      'order by NUM_NF, Serie, CGC')
    Left = 708
    Top = 396
    object tbnfcpaTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbnfcpaNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbnfcpaNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbnfcpaSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbnfcpaESPECIE: TStringField
      FieldName = 'ESPECIE'
      Size = 5
    end
    object tbnfcpaNUM_FUT: TStringField
      FieldName = 'NUM_FUT'
      Size = 9
    end
    object tbnfcpaCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbnfcpaDATA_ENT: TStringField
      FieldName = 'DATA_ENT'
      Size = 8
    end
    object tbnfcpaDATA_PED: TStringField
      FieldName = 'DATA_PED'
      Size = 8
    end
    object tbnfcpaDATA_FAT: TStringField
      FieldName = 'DATA_FAT'
      Size = 8
    end
    object tbnfcpaDATA_SAI: TStringField
      FieldName = 'DATA_SAI'
      Size = 8
    end
    object tbnfcpaDATA_CHE: TStringField
      FieldName = 'DATA_CHE'
      Size = 8
    end
    object tbnfcpaCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 4
    end
    object tbnfcpaCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbnfcpaCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbnfcpaCOD_REPRES: TStringField
      FieldName = 'COD_REPRES'
      Size = 3
    end
    object tbnfcpaCOD_SUPER: TStringField
      FieldName = 'COD_SUPER'
      Size = 3
    end
    object tbnfcpaCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbnfcpaALIQ_IPI: TFloatField
      FieldName = 'ALIQ_IPI'
    end
    object tbnfcpaALIQ_ICM: TFloatField
      FieldName = 'ALIQ_ICM'
    end
    object tbnfcpaALIQ_DICM: TFloatField
      FieldName = 'ALIQ_DICM'
    end
    object tbnfcpaB_CAL_IPI: TFloatField
      FieldName = 'B_CAL_IPI'
    end
    object tbnfcpaB_CAL_ICM: TFloatField
      FieldName = 'B_CAL_ICM'
    end
    object tbnfcpaB_CAL_DICM: TFloatField
      FieldName = 'B_CAL_DICM'
    end
    object tbnfcpaIPI: TFloatField
      FieldName = 'IPI'
    end
    object tbnfcpaICMS: TFloatField
      FieldName = 'ICMS'
    end
    object tbnfcpaDICMS: TFloatField
      FieldName = 'DICMS'
    end
    object tbnfcpaISENTA_IPI: TFloatField
      FieldName = 'ISENTA_IPI'
    end
    object tbnfcpaISENTA_ICM: TFloatField
      FieldName = 'ISENTA_ICM'
    end
    object tbnfcpaOUTRAS_IPI: TFloatField
      FieldName = 'OUTRAS_IPI'
    end
    object tbnfcpaOUTRAS_ICM: TFloatField
      FieldName = 'OUTRAS_ICM'
    end
    object tbnfcpaVAL_CONT: TFloatField
      FieldName = 'VAL_CONT'
    end
    object tbnfcpaFRETE: TFloatField
      FieldName = 'FRETE'
    end
    object tbnfcpaALIQ_FRET: TFloatField
      FieldName = 'ALIQ_FRET'
    end
    object tbnfcpaSEGURO: TFloatField
      FieldName = 'SEGURO'
    end
    object tbnfcpaALIQ_SEG: TFloatField
      FieldName = 'ALIQ_SEG'
    end
    object tbnfcpaDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbnfcpaPERC_DESC: TFloatField
      FieldName = 'PERC_DESC'
    end
    object tbnfcpaEMBALAGEM: TFloatField
      FieldName = 'EMBALAGEM'
    end
    object tbnfcpaALIQ_EMB: TFloatField
      FieldName = 'ALIQ_EMB'
    end
    object tbnfcpaENCARGOS: TFloatField
      FieldName = 'ENCARGOS'
    end
    object tbnfcpaALIQ_ENC: TFloatField
      FieldName = 'ALIQ_ENC'
    end
    object tbnfcpaTOTAL_PROD: TFloatField
      FieldName = 'TOTAL_PROD'
    end
    object tbnfcpaQTDE_ITENS: TFloatField
      FieldName = 'QTDE_ITENS'
    end
    object tbnfcpaQTDE_EMB: TFloatField
      FieldName = 'QTDE_EMB'
    end
    object tbnfcpaESP_EMB: TStringField
      FieldName = 'ESP_EMB'
      Size = 10
    end
    object tbnfcpaMARCA_EMPR: TStringField
      FieldName = 'MARCA_EMPR'
      Size = 14
    end
    object tbnfcpaPESO_LIQ: TFloatField
      FieldName = 'PESO_LIQ'
    end
    object tbnfcpaPESO_BRU: TFloatField
      FieldName = 'PESO_BRU'
    end
    object tbnfcpaNUM_PGTO: TSmallintField
      FieldName = 'NUM_PGTO'
    end
    object tbnfcpaPRAZO_MED: TSmallintField
      FieldName = 'PRAZO_MED'
    end
    object tbnfcpaORD_ENT: TSmallintField
      FieldName = 'ORD_ENT'
    end
    object tbnfcpaALIQ_COM: TFloatField
      FieldName = 'ALIQ_COM'
    end
    object tbnfcpaCOMISSAO: TFloatField
      FieldName = 'COMISSAO'
    end
    object tbnfcpaALIQ_SUP: TFloatField
      FieldName = 'ALIQ_SUP'
    end
    object tbnfcpaOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbnfcpaINSC_SUBS: TStringField
      FieldName = 'INSC_SUBS'
      Size = 18
    end
    object tbnfcpaB_CAL_SUBS: TFloatField
      FieldName = 'B_CAL_SUBS'
    end
    object tbnfcpaALIQ_SUBS: TFloatField
      FieldName = 'ALIQ_SUBS'
    end
    object tbnfcpaICMS_SUBS: TFloatField
      FieldName = 'ICMS_SUBS'
    end
    object tbnfcpaHORA_SAI: TStringField
      FieldName = 'HORA_SAI'
      Size = 6
    end
    object tbnfcpaCOD_FORM: TStringField
      FieldName = 'COD_FORM'
      Size = 2
    end
    object tbnfcpaMOTORISTA: TStringField
      FieldName = 'MOTORISTA'
      Size = 30
    end
    object tbnfcpaPLACA_VEIC: TStringField
      FieldName = 'PLACA_VEIC'
      Size = 7
    end
    object tbnfcpaVIA_TRANSP: TStringField
      FieldName = 'VIA_TRANSP'
      Size = 10
    end
    object tbnfcpaNUM_NF2: TStringField
      FieldName = 'NUM_NF2'
      Size = 9
    end
    object tbnfcpaTIPO_LF: TStringField
      FieldName = 'TIPO_LF'
      Size = 2
    end
    object tbnfcpaDIFERIDAS: TFloatField
      FieldName = 'DIFERIDAS'
    end
    object tbnfcpaCONTA_DB: TStringField
      FieldName = 'CONTA_DB'
      Size = 10
    end
    object tbnfcpaCONTA_CR: TStringField
      FieldName = 'CONTA_CR'
      Size = 10
    end
    object tbnfcpaTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbnfcpaALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbnfcpaNUM_FAB: TStringField
      FieldName = 'NUM_FAB'
      Size = 9
    end
    object tbnfcpaTIPO_FR: TStringField
      FieldName = 'TIPO_FR'
      Size = 1
    end
    object tbnfcpaPED_CLIE: TStringField
      FieldName = 'PED_CLIE'
      Size = 9
    end
    object tbnfcpaCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbnfcpaLIBERA: TStringField
      FieldName = 'LIBERA'
      Size = 1
    end
    object tbnfcpaNUM_ORD: TStringField
      FieldName = 'NUM_ORD'
      Size = 6
    end
    object tbnfcpaCOND_FAT: TStringField
      FieldName = 'COND_FAT'
    end
    object tbnfcpaUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbnfcpaOBS_LF: TStringField
      FieldName = 'OBS_LF'
      Size = 40
    end
    object tbnfcpaCOD_NAT: TStringField
      FieldName = 'COD_NAT'
      Size = 2
    end
    object tbnfcpaCONFERIDO: TStringField
      FieldName = 'CONFERIDO'
      Size = 1
    end
    object tbnfcpaCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbnfcpaCOD_TAB: TStringField
      FieldName = 'COD_TAB'
      Size = 2
    end
    object tbnfcpaPRECO: TStringField
      FieldName = 'PRECO'
      Size = 1
    end
    object tbnfcpaDESC1: TFloatField
      FieldName = 'DESC1'
    end
    object tbnfcpaDESC2: TFloatField
      FieldName = 'DESC2'
    end
    object tbnfcpaDESC3: TFloatField
      FieldName = 'DESC3'
    end
    object tbnfcpaDESC4: TFloatField
      FieldName = 'DESC4'
    end
    object tbnfcpaDESC5: TFloatField
      FieldName = 'DESC5'
    end
    object tbnfcpaDESC6: TFloatField
      FieldName = 'DESC6'
    end
    object tbnfcpaDESC7: TFloatField
      FieldName = 'DESC7'
    end
    object tbnfcpaDESC8: TFloatField
      FieldName = 'DESC8'
    end
    object tbnfcpaDESC9: TFloatField
      FieldName = 'DESC9'
    end
    object tbnfcpaB_CAL_ICFR: TFloatField
      FieldName = 'B_CAL_ICFR'
    end
    object tbnfcpaEMITENTE: TStringField
      FieldName = 'EMITENTE'
      Size = 1
    end
    object tbnfcpaREDESP: TStringField
      FieldName = 'REDESP'
      Size = 1
    end
    object tbnfcpaNUM_RE: TStringField
      FieldName = 'NUM_RE'
      Size = 12
    end
    object tbnfcpaDATA_DIGI: TStringField
      FieldName = 'DATA_DIGI'
      Size = 8
    end
    object tbnfcpaFRETE_CTA: TStringField
      FieldName = 'FRETE_CTA'
      Size = 1
    end
    object tbnfcpaCOD_MOTI: TStringField
      FieldName = 'COD_MOTI'
      Size = 3
    end
    object tbnfcpaDATA_LIB: TStringField
      FieldName = 'DATA_LIB'
      Size = 8
    end
    object tbnfcpaIMP_PED: TStringField
      FieldName = 'IMP_PED'
      Size = 1
    end
    object tbnfcpaIMP_NF: TStringField
      FieldName = 'IMP_NF'
      Size = 1
    end
    object tbnfcpaCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbnfcpaRETIRA: TStringField
      FieldName = 'RETIRA'
      Size = 1
    end
    object tbnfcpaCOD_RDSP: TStringField
      FieldName = 'COD_RDSP'
      Size = 3
    end
    object tbnfcpaCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
    object tbnfcpaPED_REPR: TStringField
      FieldName = 'PED_REPR'
      Size = 9
    end
    object tbnfcpaTIPO_PED: TStringField
      FieldName = 'TIPO_PED'
      Size = 2
    end
    object tbnfcpaSITUACAO: TStringField
      FieldName = 'SITUACAO'
      Size = 2
    end
    object tbnfcpaNUM_CARGA: TStringField
      FieldName = 'NUM_CARGA'
      Size = 6
    end
    object tbnfcpaNUM_AUT: TStringField
      FieldName = 'NUM_AUT'
      Size = 6
    end
    object tbnfcpaTIPO_DIGI: TStringField
      FieldName = 'TIPO_DIGI'
      Size = 1
    end
    object tbnfcpaDESC_COM: TFloatField
      FieldName = 'DESC_COM'
    end
  end
  object tbItemC: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    DataSource = dsnfcpa
    SQL.Strings = (
      'Select * from ITEMC'
      'where Tipo ='#39'E'#39
      'and NUM_NF =:NUM_NF AND SERIE =:SERIE AND CGC =:CGC and'
      'tipo =:tipo')
    Left = 708
    Top = 424
    ParamData = <
      item
        DataType = ftString
        Name = 'NUM_NF'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'SERIE'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'CGC'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'TIPO'
        ParamType = ptUnknown
      end>
    object tbItemCTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbItemCNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbItemCSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbItemCCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbItemCCOD_MATP: TStringField
      FieldName = 'COD_MATP'
      Size = 7
    end
    object tbItemCCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbItemCCOD_CC: TStringField
      FieldName = 'COD_CC'
      Size = 1
    end
    object tbItemCQTDE: TFloatField
      FieldName = 'QTDE'
    end
    object tbItemCDATA_MOV: TStringField
      FieldName = 'DATA_MOV'
      Size = 8
    end
    object tbItemCPREC_UNIT: TFloatField
      FieldName = 'PREC_UNIT'
    end
    object tbItemCCUSTO_MED: TFloatField
      FieldName = 'CUSTO_MED'
    end
    object tbItemCPORC_IPI: TFloatField
      FieldName = 'PORC_IPI'
    end
    object tbItemCDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbItemCNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
  end
  object dsItemC: TDataSource
    DataSet = tbItemC
    Left = 680
    Top = 424
  end
  object AUX: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    SQL.Strings = (
      'Select Cod_TF, AlFA'
      'from Taxa_for'
      'order by Cod_TF')
    Left = 483
    Top = 20
    object AUXCod_TF: TStringField
      FieldName = 'Cod_TF'
      Size = 4
    end
    object AUXAlFA: TFloatField
      FieldName = 'AlFA'
    end
  end
  object qry: TQuery
    Left = 512
    Top = 20
  end
  object dstitc: TDataSource
    DataSet = tbtitc
    Left = 680
    Top = 452
  end
  object tbtitc: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'TITCRED.DBF'
    Left = 708
    Top = 452
    object tbtitcCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbtitcNUM_DOC: TStringField
      FieldName = 'NUM_DOC'
      Size = 11
    end
    object tbtitcVALOR: TFloatField
      FieldName = 'VALOR'
    end
    object tbtitcDATAVENC: TStringField
      FieldName = 'DATAVENC'
      Size = 8
    end
    object tbtitcDATAEMIS: TStringField
      FieldName = 'DATAEMIS'
      Size = 8
    end
    object tbtitcDATAPGTO: TStringField
      FieldName = 'DATAPGTO'
      Size = 8
    end
    object tbtitcDATABASE: TStringField
      FieldName = 'DATABASE'
      Size = 8
    end
    object tbtitcVALORPAGO: TFloatField
      FieldName = 'VALORPAGO'
    end
    object tbtitcNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbtitcSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbtitcJURO: TFloatField
      FieldName = 'JURO'
    end
    object tbtitcDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbtitcCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbtitcSUB_LOC: TStringField
      FieldName = 'SUB_LOC'
      Size = 3
    end
    object tbtitcTIPO_DOC: TStringField
      FieldName = 'TIPO_DOC'
      Size = 1
    end
    object tbtitcTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbtitcTIPO_VENC: TStringField
      FieldName = 'TIPO_VENC'
      Size = 1
    end
    object tbtitcOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbtitcTIT_REF: TStringField
      FieldName = 'TIT_REF'
      Size = 3
    end
    object tbtitcNUM_BORD: TStringField
      FieldName = 'NUM_BORD'
      Size = 15
    end
    object tbtitcNUM_BLOQ: TStringField
      FieldName = 'NUM_BLOQ'
    end
    object tbtitcCOD_MOED: TStringField
      FieldName = 'COD_MOED'
      Size = 2
    end
    object tbtitcCOD_BANC: TStringField
      FieldName = 'COD_BANC'
      Size = 3
    end
    object tbtitcOBS2: TStringField
      FieldName = 'OBS2'
      Size = 40
    end
    object tbtitcBAIXA: TStringField
      FieldName = 'BAIXA'
      Size = 1
    end
    object tbtitcDATADEVO: TStringField
      FieldName = 'DATADEVO'
      Size = 8
    end
    object tbtitcBC_COMIS: TFloatField
      FieldName = 'BC_COMIS'
    end
    object tbtitcDESP_CART: TFloatField
      FieldName = 'DESP_CART'
    end
    object tbtitcCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbtitcCOD_TBAI: TStringField
      FieldName = 'COD_TBAI'
      Size = 2
    end
    object tbtitcDATAMOVI: TStringField
      FieldName = 'DATAMOVI'
      Size = 8
    end
    object tbtitcCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbtitcDATAALTE: TStringField
      FieldName = 'DATAALTE'
      Size = 8
    end
    object tbtitcHORAALTE: TStringField
      FieldName = 'HORAALTE'
      Size = 8
    end
    object tbtitcPARCIAL: TStringField
      FieldName = 'PARCIAL'
      Size = 1
    end
    object tbtitcNUM_PARC: TStringField
      FieldName = 'NUM_PARC'
      Size = 11
    end
  end
  object tbPedVen: TQuery
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    SQL.Strings = (
      'Select * from Nota'
      'where tipo = '#39'P'#39
      'and Situacao = '#39'02'#39
      'order by Num_Ped, CGC')
    Left = 708
    Top = 480
    object tbPedVenTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbPedVenNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbPedVenNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbPedVenSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbPedVenESPECIE: TStringField
      FieldName = 'ESPECIE'
      Size = 5
    end
    object tbPedVenNUM_FUT: TStringField
      FieldName = 'NUM_FUT'
      Size = 9
    end
    object tbPedVenCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbPedVenDATA_ENT: TStringField
      FieldName = 'DATA_ENT'
      Size = 8
    end
    object tbPedVenDATA_PED: TStringField
      FieldName = 'DATA_PED'
      Size = 8
    end
    object tbPedVenDATA_FAT: TStringField
      FieldName = 'DATA_FAT'
      Size = 8
    end
    object tbPedVenDATA_SAI: TStringField
      FieldName = 'DATA_SAI'
      Size = 8
    end
    object tbPedVenDATA_CHE: TStringField
      FieldName = 'DATA_CHE'
      Size = 8
    end
    object tbPedVenCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 4
    end
    object tbPedVenCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbPedVenCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbPedVenCOD_REPRES: TStringField
      FieldName = 'COD_REPRES'
      Size = 3
    end
    object tbPedVenCOD_SUPER: TStringField
      FieldName = 'COD_SUPER'
      Size = 3
    end
    object tbPedVenCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbPedVenALIQ_IPI: TFloatField
      FieldName = 'ALIQ_IPI'
    end
    object tbPedVenALIQ_ICM: TFloatField
      FieldName = 'ALIQ_ICM'
    end
    object tbPedVenALIQ_DICM: TFloatField
      FieldName = 'ALIQ_DICM'
    end
    object tbPedVenB_CAL_IPI: TFloatField
      FieldName = 'B_CAL_IPI'
    end
    object tbPedVenB_CAL_ICM: TFloatField
      FieldName = 'B_CAL_ICM'
    end
    object tbPedVenB_CAL_DICM: TFloatField
      FieldName = 'B_CAL_DICM'
    end
    object tbPedVenIPI: TFloatField
      FieldName = 'IPI'
    end
    object tbPedVenICMS: TFloatField
      FieldName = 'ICMS'
    end
    object tbPedVenDICMS: TFloatField
      FieldName = 'DICMS'
    end
    object tbPedVenISENTA_IPI: TFloatField
      FieldName = 'ISENTA_IPI'
    end
    object tbPedVenISENTA_ICM: TFloatField
      FieldName = 'ISENTA_ICM'
    end
    object tbPedVenOUTRAS_IPI: TFloatField
      FieldName = 'OUTRAS_IPI'
    end
    object tbPedVenOUTRAS_ICM: TFloatField
      FieldName = 'OUTRAS_ICM'
    end
    object tbPedVenVAL_CONT: TFloatField
      FieldName = 'VAL_CONT'
    end
    object tbPedVenFRETE: TFloatField
      FieldName = 'FRETE'
    end
    object tbPedVenALIQ_FRET: TFloatField
      FieldName = 'ALIQ_FRET'
    end
    object tbPedVenSEGURO: TFloatField
      FieldName = 'SEGURO'
    end
    object tbPedVenALIQ_SEG: TFloatField
      FieldName = 'ALIQ_SEG'
    end
    object tbPedVenDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbPedVenPERC_DESC: TFloatField
      FieldName = 'PERC_DESC'
    end
    object tbPedVenEMBALAGEM: TFloatField
      FieldName = 'EMBALAGEM'
    end
    object tbPedVenALIQ_EMB: TFloatField
      FieldName = 'ALIQ_EMB'
    end
    object tbPedVenENCARGOS: TFloatField
      FieldName = 'ENCARGOS'
    end
    object tbPedVenALIQ_ENC: TFloatField
      FieldName = 'ALIQ_ENC'
    end
    object tbPedVenTOTAL_PROD: TFloatField
      FieldName = 'TOTAL_PROD'
    end
    object tbPedVenQTDE_ITENS: TFloatField
      FieldName = 'QTDE_ITENS'
    end
    object tbPedVenQTDE_EMB: TFloatField
      FieldName = 'QTDE_EMB'
    end
    object tbPedVenESP_EMB: TStringField
      FieldName = 'ESP_EMB'
      Size = 10
    end
    object tbPedVenMARCA_EMPR: TStringField
      FieldName = 'MARCA_EMPR'
      Size = 14
    end
    object tbPedVenPESO_LIQ: TFloatField
      FieldName = 'PESO_LIQ'
    end
    object tbPedVenPESO_BRU: TFloatField
      FieldName = 'PESO_BRU'
    end
    object tbPedVenNUM_PGTO: TSmallintField
      FieldName = 'NUM_PGTO'
    end
    object tbPedVenPRAZO_MED: TSmallintField
      FieldName = 'PRAZO_MED'
    end
    object tbPedVenORD_ENT: TSmallintField
      FieldName = 'ORD_ENT'
    end
    object tbPedVenALIQ_COM: TFloatField
      FieldName = 'ALIQ_COM'
    end
    object tbPedVenCOMISSAO: TFloatField
      FieldName = 'COMISSAO'
    end
    object tbPedVenALIQ_SUP: TFloatField
      FieldName = 'ALIQ_SUP'
    end
    object tbPedVenOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbPedVenINSC_SUBS: TStringField
      FieldName = 'INSC_SUBS'
      Size = 18
    end
    object tbPedVenB_CAL_SUBS: TFloatField
      FieldName = 'B_CAL_SUBS'
    end
    object tbPedVenALIQ_SUBS: TFloatField
      FieldName = 'ALIQ_SUBS'
    end
    object tbPedVenICMS_SUBS: TFloatField
      FieldName = 'ICMS_SUBS'
    end
    object tbPedVenHORA_SAI: TStringField
      FieldName = 'HORA_SAI'
      Size = 6
    end
    object tbPedVenCOD_FORM: TStringField
      FieldName = 'COD_FORM'
      Size = 2
    end
    object tbPedVenMOTORISTA: TStringField
      FieldName = 'MOTORISTA'
      Size = 30
    end
    object tbPedVenPLACA_VEIC: TStringField
      FieldName = 'PLACA_VEIC'
      Size = 7
    end
    object tbPedVenVIA_TRANSP: TStringField
      FieldName = 'VIA_TRANSP'
      Size = 10
    end
    object tbPedVenNUM_NF2: TStringField
      FieldName = 'NUM_NF2'
      Size = 9
    end
    object tbPedVenTIPO_LF: TStringField
      FieldName = 'TIPO_LF'
      Size = 2
    end
    object tbPedVenDIFERIDAS: TFloatField
      FieldName = 'DIFERIDAS'
    end
    object tbPedVenCONTA_DB: TStringField
      FieldName = 'CONTA_DB'
      Size = 10
    end
    object tbPedVenCONTA_CR: TStringField
      FieldName = 'CONTA_CR'
      Size = 10
    end
    object tbPedVenTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbPedVenALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbPedVenNUM_FAB: TStringField
      FieldName = 'NUM_FAB'
      Size = 9
    end
    object tbPedVenTIPO_FR: TStringField
      FieldName = 'TIPO_FR'
      Size = 1
    end
    object tbPedVenPED_CLIE: TStringField
      FieldName = 'PED_CLIE'
      Size = 9
    end
    object tbPedVenCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbPedVenLIBERA: TStringField
      FieldName = 'LIBERA'
      Size = 1
    end
    object tbPedVenNUM_ORD: TStringField
      FieldName = 'NUM_ORD'
      Size = 6
    end
    object tbPedVenCOND_FAT: TStringField
      FieldName = 'COND_FAT'
    end
    object tbPedVenUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbPedVenOBS_LF: TStringField
      FieldName = 'OBS_LF'
      Size = 40
    end
    object tbPedVenCOD_NAT: TStringField
      FieldName = 'COD_NAT'
      Size = 2
    end
    object tbPedVenCONFERIDO: TStringField
      FieldName = 'CONFERIDO'
      Size = 1
    end
    object tbPedVenCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbPedVenCOD_TAB: TStringField
      FieldName = 'COD_TAB'
      Size = 2
    end
    object tbPedVenPRECO: TStringField
      FieldName = 'PRECO'
      Size = 1
    end
    object tbPedVenDESC1: TFloatField
      FieldName = 'DESC1'
    end
    object tbPedVenDESC2: TFloatField
      FieldName = 'DESC2'
    end
    object tbPedVenDESC3: TFloatField
      FieldName = 'DESC3'
    end
    object tbPedVenDESC4: TFloatField
      FieldName = 'DESC4'
    end
    object tbPedVenDESC5: TFloatField
      FieldName = 'DESC5'
    end
    object tbPedVenDESC6: TFloatField
      FieldName = 'DESC6'
    end
    object tbPedVenDESC7: TFloatField
      FieldName = 'DESC7'
    end
    object tbPedVenDESC8: TFloatField
      FieldName = 'DESC8'
    end
    object tbPedVenDESC9: TFloatField
      FieldName = 'DESC9'
    end
    object tbPedVenB_CAL_ICFR: TFloatField
      FieldName = 'B_CAL_ICFR'
    end
    object tbPedVenEMITENTE: TStringField
      FieldName = 'EMITENTE'
      Size = 1
    end
    object tbPedVenREDESP: TStringField
      FieldName = 'REDESP'
      Size = 1
    end
    object tbPedVenNUM_RE: TStringField
      FieldName = 'NUM_RE'
      Size = 12
    end
    object tbPedVenDATA_DIGI: TStringField
      FieldName = 'DATA_DIGI'
      Size = 8
    end
    object tbPedVenFRETE_CTA: TStringField
      FieldName = 'FRETE_CTA'
      Size = 1
    end
    object tbPedVenCOD_MOTI: TStringField
      FieldName = 'COD_MOTI'
      Size = 3
    end
    object tbPedVenDATA_LIB: TStringField
      FieldName = 'DATA_LIB'
      Size = 8
    end
    object tbPedVenIMP_PED: TStringField
      FieldName = 'IMP_PED'
      Size = 1
    end
    object tbPedVenIMP_NF: TStringField
      FieldName = 'IMP_NF'
      Size = 1
    end
    object tbPedVenCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbPedVenRETIRA: TStringField
      FieldName = 'RETIRA'
      Size = 1
    end
    object tbPedVenCOD_RDSP: TStringField
      FieldName = 'COD_RDSP'
      Size = 3
    end
    object tbPedVenCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
    object tbPedVenPED_REPR: TStringField
      FieldName = 'PED_REPR'
      Size = 9
    end
    object tbPedVenTIPO_PED: TStringField
      FieldName = 'TIPO_PED'
      Size = 2
    end
    object tbPedVenSITUACAO: TStringField
      FieldName = 'SITUACAO'
      Size = 2
    end
    object tbPedVenNUM_CARGA: TStringField
      FieldName = 'NUM_CARGA'
      Size = 6
    end
    object tbPedVenNUM_AUT: TStringField
      FieldName = 'NUM_AUT'
      Size = 6
    end
    object tbPedVenTIPO_DIGI: TStringField
      FieldName = 'TIPO_DIGI'
      Size = 1
    end
    object tbPedVenDESC_COM: TFloatField
      FieldName = 'DESC_COM'
    end
  end
  object dsPedVen: TDataSource
    DataSet = tbPedVen
    Left = 680
    Top = 480
  end
  object tbItpv: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    DataSource = dsPedVen
    SQL.Strings = (
      'Select distinct * from itemV'
      'where NUM_NF =:NUM_NF and'
      'NUM_PED =:NUM_Ped and CGC =:CGC'
      'Order by NUM_PED')
    Left = 708
    Top = 508
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'NUM_NF'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'NUM_Ped'
        ParamType = ptUnknown
      end
      item
        DataType = ftUnknown
        Name = 'CGC'
        ParamType = ptUnknown
      end>
    object tbItpvTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbItpvNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbItpvSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbItpvCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbItpvCOD_PROD: TStringField
      FieldName = 'COD_PROD'
      Size = 7
    end
    object tbItpvCOD_REV: TStringField
      FieldName = 'COD_REV'
      Size = 7
    end
    object tbItpvCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbItpvCOD_CC: TStringField
      FieldName = 'COD_CC'
      Size = 1
    end
    object tbItpvQTDE: TFloatField
      FieldName = 'QTDE'
    end
    object tbItpvDATA_MOV: TStringField
      FieldName = 'DATA_MOV'
      Size = 8
    end
    object tbItpvPRECO_VEND: TFloatField
      FieldName = 'PRECO_VEND'
    end
    object tbItpvCUSTO_MED: TFloatField
      FieldName = 'CUSTO_MED'
    end
    object tbItpvPORC_IPI: TFloatField
      FieldName = 'PORC_IPI'
    end
    object tbItpvDESC_TAB: TFloatField
      FieldName = 'DESC_TAB'
    end
    object tbItpvDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbItpvNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbItpvCOD_CONJ: TStringField
      FieldName = 'COD_CONJ'
      Size = 7
    end
  end
  object dsItpv: TDataSource
    DataSet = tbItpv
    Left = 680
    Top = 508
  end
  object tbPedCpa: TQuery
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    SQL.Strings = (
      'Select * from Nota'
      'where tipo = '#39'C'#39
      'order by Num_Ped, CGC')
    Left = 648
    Top = 2
    object tbPedCpaTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbPedCpaNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbPedCpaNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbPedCpaSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbPedCpaESPECIE: TStringField
      FieldName = 'ESPECIE'
      Size = 5
    end
    object tbPedCpaNUM_FUT: TStringField
      FieldName = 'NUM_FUT'
      Size = 9
    end
    object tbPedCpaCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbPedCpaDATA_ENT: TStringField
      FieldName = 'DATA_ENT'
      Size = 8
    end
    object tbPedCpaDATA_PED: TStringField
      FieldName = 'DATA_PED'
      Size = 8
    end
    object tbPedCpaDATA_FAT: TStringField
      FieldName = 'DATA_FAT'
      Size = 8
    end
    object tbPedCpaDATA_SAI: TStringField
      FieldName = 'DATA_SAI'
      Size = 8
    end
    object tbPedCpaDATA_CHE: TStringField
      FieldName = 'DATA_CHE'
      Size = 8
    end
    object tbPedCpaCOD_FISC: TStringField
      FieldName = 'COD_FISC'
      Size = 4
    end
    object tbPedCpaCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbPedCpaCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbPedCpaCOD_REPRES: TStringField
      FieldName = 'COD_REPRES'
      Size = 3
    end
    object tbPedCpaCOD_SUPER: TStringField
      FieldName = 'COD_SUPER'
      Size = 3
    end
    object tbPedCpaCOD_REGRA: TStringField
      FieldName = 'COD_REGRA'
      Size = 3
    end
    object tbPedCpaALIQ_IPI: TFloatField
      FieldName = 'ALIQ_IPI'
    end
    object tbPedCpaALIQ_ICM: TFloatField
      FieldName = 'ALIQ_ICM'
    end
    object tbPedCpaALIQ_DICM: TFloatField
      FieldName = 'ALIQ_DICM'
    end
    object tbPedCpaB_CAL_IPI: TFloatField
      FieldName = 'B_CAL_IPI'
    end
    object tbPedCpaB_CAL_ICM: TFloatField
      FieldName = 'B_CAL_ICM'
    end
    object tbPedCpaB_CAL_DICM: TFloatField
      FieldName = 'B_CAL_DICM'
    end
    object tbPedCpaIPI: TFloatField
      FieldName = 'IPI'
    end
    object tbPedCpaICMS: TFloatField
      FieldName = 'ICMS'
    end
    object tbPedCpaDICMS: TFloatField
      FieldName = 'DICMS'
    end
    object tbPedCpaISENTA_IPI: TFloatField
      FieldName = 'ISENTA_IPI'
    end
    object tbPedCpaISENTA_ICM: TFloatField
      FieldName = 'ISENTA_ICM'
    end
    object tbPedCpaOUTRAS_IPI: TFloatField
      FieldName = 'OUTRAS_IPI'
    end
    object tbPedCpaOUTRAS_ICM: TFloatField
      FieldName = 'OUTRAS_ICM'
    end
    object tbPedCpaVAL_CONT: TFloatField
      FieldName = 'VAL_CONT'
    end
    object tbPedCpaFRETE: TFloatField
      FieldName = 'FRETE'
    end
    object tbPedCpaALIQ_FRET: TFloatField
      FieldName = 'ALIQ_FRET'
    end
    object tbPedCpaSEGURO: TFloatField
      FieldName = 'SEGURO'
    end
    object tbPedCpaALIQ_SEG: TFloatField
      FieldName = 'ALIQ_SEG'
    end
    object tbPedCpaDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbPedCpaPERC_DESC: TFloatField
      FieldName = 'PERC_DESC'
    end
    object tbPedCpaEMBALAGEM: TFloatField
      FieldName = 'EMBALAGEM'
    end
    object tbPedCpaALIQ_EMB: TFloatField
      FieldName = 'ALIQ_EMB'
    end
    object tbPedCpaENCARGOS: TFloatField
      FieldName = 'ENCARGOS'
    end
    object tbPedCpaALIQ_ENC: TFloatField
      FieldName = 'ALIQ_ENC'
    end
    object tbPedCpaTOTAL_PROD: TFloatField
      FieldName = 'TOTAL_PROD'
    end
    object tbPedCpaQTDE_ITENS: TFloatField
      FieldName = 'QTDE_ITENS'
    end
    object tbPedCpaQTDE_EMB: TFloatField
      FieldName = 'QTDE_EMB'
    end
    object tbPedCpaESP_EMB: TStringField
      FieldName = 'ESP_EMB'
      Size = 10
    end
    object tbPedCpaMARCA_EMPR: TStringField
      FieldName = 'MARCA_EMPR'
      Size = 14
    end
    object tbPedCpaPESO_LIQ: TFloatField
      FieldName = 'PESO_LIQ'
    end
    object tbPedCpaPESO_BRU: TFloatField
      FieldName = 'PESO_BRU'
    end
    object tbPedCpaNUM_PGTO: TSmallintField
      FieldName = 'NUM_PGTO'
    end
    object tbPedCpaPRAZO_MED: TSmallintField
      FieldName = 'PRAZO_MED'
    end
    object tbPedCpaORD_ENT: TSmallintField
      FieldName = 'ORD_ENT'
    end
    object tbPedCpaALIQ_COM: TFloatField
      FieldName = 'ALIQ_COM'
    end
    object tbPedCpaCOMISSAO: TFloatField
      FieldName = 'COMISSAO'
    end
    object tbPedCpaALIQ_SUP: TFloatField
      FieldName = 'ALIQ_SUP'
    end
    object tbPedCpaOBS: TStringField
      FieldName = 'OBS'
      Size = 40
    end
    object tbPedCpaINSC_SUBS: TStringField
      FieldName = 'INSC_SUBS'
      Size = 18
    end
    object tbPedCpaB_CAL_SUBS: TFloatField
      FieldName = 'B_CAL_SUBS'
    end
    object tbPedCpaALIQ_SUBS: TFloatField
      FieldName = 'ALIQ_SUBS'
    end
    object tbPedCpaICMS_SUBS: TFloatField
      FieldName = 'ICMS_SUBS'
    end
    object tbPedCpaHORA_SAI: TStringField
      FieldName = 'HORA_SAI'
      Size = 6
    end
    object tbPedCpaCOD_FORM: TStringField
      FieldName = 'COD_FORM'
      Size = 2
    end
    object tbPedCpaMOTORISTA: TStringField
      FieldName = 'MOTORISTA'
      Size = 30
    end
    object tbPedCpaPLACA_VEIC: TStringField
      FieldName = 'PLACA_VEIC'
      Size = 7
    end
    object tbPedCpaVIA_TRANSP: TStringField
      FieldName = 'VIA_TRANSP'
      Size = 10
    end
    object tbPedCpaNUM_NF2: TStringField
      FieldName = 'NUM_NF2'
      Size = 9
    end
    object tbPedCpaTIPO_LF: TStringField
      FieldName = 'TIPO_LF'
      Size = 2
    end
    object tbPedCpaDIFERIDAS: TFloatField
      FieldName = 'DIFERIDAS'
    end
    object tbPedCpaCONTA_DB: TStringField
      FieldName = 'CONTA_DB'
      Size = 10
    end
    object tbPedCpaCONTA_CR: TStringField
      FieldName = 'CONTA_CR'
      Size = 10
    end
    object tbPedCpaTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbPedCpaALIQ: TFloatField
      FieldName = 'ALIQ'
    end
    object tbPedCpaNUM_FAB: TStringField
      FieldName = 'NUM_FAB'
      Size = 9
    end
    object tbPedCpaTIPO_FR: TStringField
      FieldName = 'TIPO_FR'
      Size = 1
    end
    object tbPedCpaPED_CLIE: TStringField
      FieldName = 'PED_CLIE'
      Size = 9
    end
    object tbPedCpaCOD_USUA: TStringField
      FieldName = 'COD_USUA'
      Size = 2
    end
    object tbPedCpaLIBERA: TStringField
      FieldName = 'LIBERA'
      Size = 1
    end
    object tbPedCpaNUM_ORD: TStringField
      FieldName = 'NUM_ORD'
      Size = 6
    end
    object tbPedCpaCOND_FAT: TStringField
      FieldName = 'COND_FAT'
    end
    object tbPedCpaUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object tbPedCpaOBS_LF: TStringField
      FieldName = 'OBS_LF'
      Size = 40
    end
    object tbPedCpaCOD_NAT: TStringField
      FieldName = 'COD_NAT'
      Size = 2
    end
    object tbPedCpaCONFERIDO: TStringField
      FieldName = 'CONFERIDO'
      Size = 1
    end
    object tbPedCpaCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbPedCpaCOD_TAB: TStringField
      FieldName = 'COD_TAB'
      Size = 2
    end
    object tbPedCpaPRECO: TStringField
      FieldName = 'PRECO'
      Size = 1
    end
    object tbPedCpaDESC1: TFloatField
      FieldName = 'DESC1'
    end
    object tbPedCpaDESC2: TFloatField
      FieldName = 'DESC2'
    end
    object tbPedCpaDESC3: TFloatField
      FieldName = 'DESC3'
    end
    object tbPedCpaDESC4: TFloatField
      FieldName = 'DESC4'
    end
    object tbPedCpaDESC5: TFloatField
      FieldName = 'DESC5'
    end
    object tbPedCpaDESC6: TFloatField
      FieldName = 'DESC6'
    end
    object tbPedCpaDESC7: TFloatField
      FieldName = 'DESC7'
    end
    object tbPedCpaDESC8: TFloatField
      FieldName = 'DESC8'
    end
    object tbPedCpaDESC9: TFloatField
      FieldName = 'DESC9'
    end
    object tbPedCpaB_CAL_ICFR: TFloatField
      FieldName = 'B_CAL_ICFR'
    end
    object tbPedCpaEMITENTE: TStringField
      FieldName = 'EMITENTE'
      Size = 1
    end
    object tbPedCpaREDESP: TStringField
      FieldName = 'REDESP'
      Size = 1
    end
    object tbPedCpaNUM_RE: TStringField
      FieldName = 'NUM_RE'
      Size = 12
    end
    object tbPedCpaDATA_DIGI: TStringField
      FieldName = 'DATA_DIGI'
      Size = 8
    end
    object tbPedCpaFRETE_CTA: TStringField
      FieldName = 'FRETE_CTA'
      Size = 1
    end
    object tbPedCpaCOD_MOTI: TStringField
      FieldName = 'COD_MOTI'
      Size = 3
    end
    object tbPedCpaDATA_LIB: TStringField
      FieldName = 'DATA_LIB'
      Size = 8
    end
    object tbPedCpaIMP_PED: TStringField
      FieldName = 'IMP_PED'
      Size = 1
    end
    object tbPedCpaIMP_NF: TStringField
      FieldName = 'IMP_NF'
      Size = 1
    end
    object tbPedCpaCOD_LOC: TStringField
      FieldName = 'COD_LOC'
      Size = 3
    end
    object tbPedCpaRETIRA: TStringField
      FieldName = 'RETIRA'
      Size = 1
    end
    object tbPedCpaCOD_RDSP: TStringField
      FieldName = 'COD_RDSP'
      Size = 3
    end
    object tbPedCpaCOD_TF: TStringField
      FieldName = 'COD_TF'
      Size = 4
    end
    object tbPedCpaPED_REPR: TStringField
      FieldName = 'PED_REPR'
      Size = 9
    end
    object tbPedCpaTIPO_PED: TStringField
      FieldName = 'TIPO_PED'
      Size = 2
    end
    object tbPedCpaSITUACAO: TStringField
      FieldName = 'SITUACAO'
      Size = 2
    end
    object tbPedCpaNUM_CARGA: TStringField
      FieldName = 'NUM_CARGA'
      Size = 6
    end
    object tbPedCpaNUM_AUT: TStringField
      FieldName = 'NUM_AUT'
      Size = 6
    end
    object tbPedCpaTIPO_DIGI: TStringField
      FieldName = 'TIPO_DIGI'
      Size = 1
    end
    object tbPedCpaDESC_COM: TFloatField
      FieldName = 'DESC_COM'
    end
  end
  object dsPedCpa: TDataSource
    DataSet = tbPedCpa
    Left = 620
    Top = 2
  end
  object tbItpC: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    DataSource = dsPedCpa
    SQL.Strings = (
      'Select distinct * from itemC'
      'where NUM_NF =:NUM_NF and'
      'NUM_PED =:NUM_Ped and CGC =:CGC'
      'Order by NUM_PED')
    Left = 648
    Top = 30
    ParamData = <
      item
        DataType = ftString
        Name = 'NUM_NF'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'NUM_PED'
        ParamType = ptUnknown
      end
      item
        DataType = ftString
        Name = 'CGC'
        ParamType = ptUnknown
      end>
    object tbItpCTIPO: TStringField
      FieldName = 'TIPO'
      Size = 1
    end
    object tbItpCNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbItpCSERIE: TStringField
      FieldName = 'SERIE'
      Size = 3
    end
    object tbItpCCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbItpCCOD_MATP: TStringField
      FieldName = 'COD_MATP'
      Size = 7
    end
    object tbItpCCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbItpCCOD_CC: TStringField
      FieldName = 'COD_CC'
      Size = 1
    end
    object tbItpCQTDE: TFloatField
      FieldName = 'QTDE'
    end
    object tbItpCDATA_MOV: TStringField
      FieldName = 'DATA_MOV'
      Size = 8
    end
    object tbItpCPREC_UNIT: TFloatField
      FieldName = 'PREC_UNIT'
    end
    object tbItpCCUSTO_MED: TFloatField
      FieldName = 'CUSTO_MED'
    end
    object tbItpCPORC_IPI: TFloatField
      FieldName = 'PORC_IPI'
    end
    object tbItpCDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object tbItpCNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
  end
  object dsItpC: TDataSource
    DataSet = tbItpC
    Left = 620
    Top = 30
  end
  object tbCarga: TQuery
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    SQL.Strings = (
      'Select * from Carga'
      'order by Num_Carg')
    Left = 648
    Top = 58
    object tbCargaNUM_CARG: TStringField
      FieldName = 'NUM_CARG'
      Size = 6
    end
    object tbCargaDATA_CAR: TStringField
      FieldName = 'DATA_CAR'
      Size = 8
    end
    object tbCargaCOD_TRANSP: TStringField
      FieldName = 'COD_TRANSP'
      Size = 3
    end
    object tbCargaOBS1: TStringField
      FieldName = 'OBS1'
      Size = 40
    end
    object tbCargaOBS2: TStringField
      FieldName = 'OBS2'
      Size = 40
    end
    object tbCargaOBS3: TStringField
      FieldName = 'OBS3'
      Size = 40
    end
    object tbCargaFECHADA: TStringField
      FieldName = 'FECHADA'
      Size = 1
    end
  end
  object dsCarga: TDataSource
    DataSet = tbCarga
    Left = 620
    Top = 58
  end
  object tbItc: TQuery
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    DataSource = dsCarga
    SQL.Strings = (
      'Select distinct * from It_Carg'
      'where Num_Carg =:Num_Carg'
      'order by Num_Carg')
    Left = 648
    Top = 86
    ParamData = <
      item
        DataType = ftString
        Name = 'NUM_CARG'
        ParamType = ptUnknown
      end>
    object tbItcNUM_CARG: TStringField
      FieldName = 'NUM_CARG'
      Size = 6
    end
    object tbItcNUM_PED: TStringField
      FieldName = 'NUM_PED'
      Size = 9
    end
    object tbItcCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbItcTIPO_FAT: TStringField
      FieldName = 'TIPO_FAT'
      Size = 1
    end
    object tbItcCOD_PROD: TStringField
      FieldName = 'COD_PROD'
      Size = 7
    end
    object tbItcCOD_REV: TStringField
      FieldName = 'COD_REV'
      Size = 7
    end
    object tbItcCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 6
    end
    object tbItcQTDE: TFloatField
      FieldName = 'QTDE'
    end
    object tbItcNUM_FAB: TStringField
      FieldName = 'NUM_FAB'
      Size = 9
    end
    object tbItcOBSERV: TStringField
      FieldName = 'OBSERV'
      Size = 30
    end
    object tbItcNUM_AGRUP: TStringField
      FieldName = 'NUM_AGRUP'
      Size = 9
    end
  end
  object dsItc: TDataSource
    DataSet = tbItc
    Left = 620
    Top = 86
  end
  object dsOcorr: TDataSource
    DataSet = tbOcorr
    Left = 620
    Top = 114
  end
  object tbOcorr: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'OCORREN.DBF'
    Left = 648
    Top = 114
    object tbOcorrCOD_OCOR: TStringField
      FieldName = 'COD_OCOR'
      Size = 2
    end
    object tbOcorrDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 25
    end
  end
  object dsCausaAss: TDataSource
    DataSet = tbCausaAss
    Left = 620
    Top = 142
  end
  object tbCausaAss: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'CAUS_AS.DBF'
    Left = 648
    Top = 142
    object tbCausaAssCOD_CAUS: TStringField
      FieldName = 'COD_CAUS'
      Size = 2
    end
    object tbCausaAssDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 25
    end
  end
  object tbMotivo: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'MOTIVO.DBF'
    Left = 648
    Top = 170
    object tbMotivoCOD_MOTI: TStringField
      FieldName = 'COD_MOTI'
      Size = 3
    end
    object tbMotivoDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 40
    end
  end
  object dsMotivo: TDataSource
    DataSet = tbMotivo
    Left = 620
    Top = 170
  end
  object dsMovim: TDataSource
    DataSet = tbMovim
    Left = 620
    Top = 198
  end
  object tbMovim: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'MOVIM.DBF'
    Left = 648
    Top = 198
    object tbMovimCOD_BANC: TStringField
      FieldName = 'COD_BANC'
      Size = 3
    end
    object tbMovimDATA: TStringField
      FieldName = 'DATA'
      Size = 8
    end
    object tbMovimHIST: TStringField
      FieldName = 'HIST'
      Size = 40
    end
    object tbMovimCOD_HIST: TStringField
      FieldName = 'COD_HIST'
      Size = 5
    end
    object tbMovimTIC: TStringField
      FieldName = 'TIC'
      Size = 1
    end
    object tbMovimDATA_TIC: TStringField
      FieldName = 'DATA_TIC'
      Size = 8
    end
    object tbMovimIMPCHEQ: TStringField
      FieldName = 'IMPCHEQ'
      Size = 1
    end
    object tbMovimCONTAB: TStringField
      FieldName = 'CONTAB'
      Size = 1
    end
    object tbMovimFAVORECIDO: TStringField
      FieldName = 'FAVORECIDO'
      Size = 40
    end
    object tbMovimNUM_CHEQ: TFloatField
      FieldName = 'NUM_CHEQ'
    end
    object tbMovimGRUPO: TStringField
      FieldName = 'GRUPO'
      Size = 2
    end
    object tbMovimVALOR: TFloatField
      FieldName = 'VALOR'
    end
  end
  object tbObsNtVda: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'OBS_PED.DBF'
    Left = 648
    Top = 226
    object tbObsNtVdaNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbObsNtVdaCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbObsNtVdaOBS1: TStringField
      FieldName = 'OBS1'
      Size = 70
    end
    object tbObsNtVdaOBS2: TStringField
      FieldName = 'OBS2'
      Size = 70
    end
    object tbObsNtVdaOBS3: TStringField
      FieldName = 'OBS3'
      Size = 70
    end
    object tbObsNtVdaOBS4: TStringField
      FieldName = 'OBS4'
      Size = 70
    end
    object tbObsNtVdaOBS5: TStringField
      FieldName = 'OBS5'
      Size = 70
    end
    object tbObsNtVdaOBS6: TStringField
      FieldName = 'OBS6'
      Size = 70
    end
    object tbObsNtVdaOBS7: TStringField
      FieldName = 'OBS7'
      Size = 50
    end
  end
  object dsObsNtVda: TDataSource
    DataSet = tbObsNtVda
    Left = 620
    Top = 226
  end
  object tbObsPdVda: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'OBS_PED.DBF'
    Left = 648
    Top = 254
    object tbObsPdVdaNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbObsPdVdaCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbObsPdVdaOBS1: TStringField
      FieldName = 'OBS1'
      Size = 70
    end
    object tbObsPdVdaOBS2: TStringField
      FieldName = 'OBS2'
      Size = 70
    end
    object tbObsPdVdaOBS3: TStringField
      FieldName = 'OBS3'
      Size = 70
    end
    object tbObsPdVdaOBS4: TStringField
      FieldName = 'OBS4'
      Size = 70
    end
    object tbObsPdVdaOBS5: TStringField
      FieldName = 'OBS5'
      Size = 70
    end
    object tbObsPdVdaOBS6: TStringField
      FieldName = 'OBS6'
      Size = 70
    end
    object tbObsPdVdaOBS7: TStringField
      FieldName = 'OBS7'
      Size = 50
    end
  end
  object dsObsPdVda: TDataSource
    DataSet = tbObsPdVda
    Left = 620
    Top = 254
  end
  object tbObsPdCpa: TTable
    DatabaseName = 'T:\jandaia\int\EMPR_001'
    TableName = 'OBS_PDC.DBF'
    Left = 648
    Top = 282
    object tbObsPdCpaNUM_NF: TStringField
      FieldName = 'NUM_NF'
      Size = 9
    end
    object tbObsPdCpaCGC: TStringField
      FieldName = 'CGC'
      Size = 14
    end
    object tbObsPdCpaOBS1: TStringField
      FieldName = 'OBS1'
      Size = 60
    end
    object tbObsPdCpaOBS2: TStringField
      FieldName = 'OBS2'
      Size = 60
    end
    object tbObsPdCpaOBS3: TStringField
      FieldName = 'OBS3'
      Size = 60
    end
    object tbObsPdCpaOBS4: TStringField
      FieldName = 'OBS4'
      Size = 60
    end
    object tbObsPdCpaOBS5: TStringField
      FieldName = 'OBS5'
      Size = 60
    end
  end
  object dsObsPdCpa: TDataSource
    DataSet = tbObsPdCpa
    Left = 620
    Top = 282
  end
  object dsMatiPri: TDataSource
    DataSet = tbMatPri
    Left = 620
    Top = 310
  end
  object tbMatPri: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'MATPRI.DBF'
    Left = 648
    Top = 310
    object tbMatPriCOD_MATP: TStringField
      FieldName = 'COD_MATP'
      Size = 6
    end
    object tbMatPriUNIDADE: TStringField
      FieldName = 'UNIDADE'
      Size = 3
    end
    object tbMatPriCOD_TRIB: TStringField
      FieldName = 'COD_TRIB'
      Size = 3
    end
    object tbMatPriNBM: TStringField
      FieldName = 'NBM'
      Size = 2
    end
    object tbMatPriEST_MIN: TFloatField
      FieldName = 'EST_MIN'
    end
    object tbMatPriCOD_PADR: TStringField
      FieldName = 'COD_PADR'
      Size = 3
    end
    object tbMatPriBAIXA: TStringField
      FieldName = 'BAIXA'
      Size = 1
    end
    object tbMatPriCUSTO_TAB: TFloatField
      FieldName = 'CUSTO_TAB'
    end
    object tbMatPriICM_TAB: TFloatField
      FieldName = 'ICM_TAB'
    end
    object tbMatPriPRAZO_TAB: TSmallintField
      FieldName = 'PRAZO_TAB'
    end
    object tbMatPriPRECO_TAB: TFloatField
      FieldName = 'PRECO_TAB'
    end
    object tbMatPriIPI_TAB: TFloatField
      FieldName = 'IPI_TAB'
    end
    object tbMatPriICM_FRETE: TFloatField
      FieldName = 'ICM_FRETE'
    end
    object tbMatPriDT_SDINI: TStringField
      FieldName = 'DT_SDINI'
      Size = 8
    end
    object tbMatPriJURO_TAB: TFloatField
      FieldName = 'JURO_TAB'
    end
    object tbMatPriFLUXO_TAB: TSmallintField
      FieldName = 'FLUXO_TAB'
    end
    object tbMatPriFRETE: TFloatField
      FieldName = 'FRETE'
    end
    object tbMatPriQUEBRA: TFloatField
      FieldName = 'QUEBRA'
    end
    object tbMatPriDIVISOR: TFloatField
      FieldName = 'DIVISOR'
    end
    object tbMatPriATIVO: TStringField
      FieldName = 'ATIVO'
      Size = 1
    end
    object tbMatPriPRECO_ANT: TFloatField
      FieldName = 'PRECO_ANT'
    end
    object tbMatPriCOD_DEPT: TStringField
      FieldName = 'COD_DEPT'
      Size = 1
    end
    object tbMatPriPRECO_FUT: TFloatField
      FieldName = 'PRECO_FUT'
    end
    object tbMatPriQTD_AUT: TStringField
      FieldName = 'QTD_AUT'
      Size = 1
    end
    object tbMatPriCOD_GRUP: TStringField
      FieldName = 'COD_GRUP'
      Size = 2
    end
    object tbMatPriPIS: TFloatField
      FieldName = 'PIS'
    end
    object tbMatPriCOFINS: TFloatField
      FieldName = 'COFINS'
    end
  end
  object tbBordero: TTable
    DatabaseName = 'T:\nutribra\intn\EMPR_001'
    TableName = 'BORDERO.DBF'
    Left = 649
    Top = 339
    object tbBorderoNUM_BORD: TStringField
      FieldName = 'NUM_BORD'
      Size = 15
    end
    object tbBorderoMENSAGEM: TStringField
      FieldName = 'MENSAGEM'
      Size = 180
    end
  end
  object dsBordero: TDataSource
    DataSet = tbBordero
    Left = 621
    Top = 339
  end
end
